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VTV REPROTECHNIKA 



E L Asz A 



A PRIMO otthoni szAmitogep m&kodtet6 programjAnak leirAsa a 
"PRIMO fiizetek" sorozat kereteben Jelenik meg. A leirAs celja, 
hogy feltAVja a PRIMO szAmitogep RDM-ban elhelyezkedo rendszer- 
programjAnak mllkodeset. Olyan segedeszkoz legyen, melynek megis- 
meresevel es hasznAlatAval a szakember es a fejleszteni vAgy6 
amatdr a PRIMO mdkodteto programjAt sajAt celjainak megval6si- 
tAsAban, adott feladatok megoldAsAban fel tudja hasznalni. 

Az otthoni mikroszAmitogep alkalmazAsa mindenki szAmAra 
nyitott. Beepitheti sajat fejlesztesfit keszulekebe, felhasznAl- 
hatja sajat maga vagy mas Altai eloAllitott rendszerekben. 
£pithet hozzA kiegeszitd elemeket, periferiAkat, meromftszereket, 
erzekeld es beavatkoz6 elemeket, mttkodtetheti a legkulonbozobb 
vezerlesi es szabAlyozAsi folyamatokban. A gepre irt programokban 
felhasznAlhatja a mtlkddteto program rutinjait, az azok mAkodeset 
befolyAsold parameterek ertekeit sajAt celjainak megfeleloen 
mddosithatja. 

A szoftver leirAs figyelmes olvasAsAval megismerheti a PRIMO 
rendszerprogramjAnak mftkddeset. MegvizsgAlhatja hogy a mikroszA- 
mitogepet alkalmazhatja-e, s ha igen f mi I yen mod on sajAt felada- 
tainak megoldAsAban. 

Remeljuk, kerdeseire e fuzet vAlaszt ad. Ha megsem, keressen 
meg minket! Mint a berendezes letrehoz6i, mftszaki es programozAsi 
kerdeseinek megoldAsAhoz keszsegesen rendelkezesere ALlunk. Ha 
egyutt akar velunk mbkodni, es otleteire, javaslataira, mftszaki 
megoldAsairar programjaira szeleskorft erdeklodest I At, mutassa be 
azokat nekunk. Ezek gyArtAsbavitelet megszervezzuk, terjeszteset 
megoldjuk. 



Legyen partn«runk ! 

COSY Mftszaki Fejlesztd LeAnyvAUalat 



A PRtHO OTTHONI BZflMrTOOiP K*T 8ZOLBALATI TALflLMrtNYON 

ALAPUL. EZEK TULAJDONOBA A rlMVMI TUDOPMNVM AKADftMXA 

■ IMirTMTieHNIKAI *• AUTOMAT X ZAI_A»X KUTATO JNT*«T». A 
TELJEB BERENOEZtBT A niOROKKY KUTATAOX rtt.7l.K«ZT*«X 
TBNMKI.ftOX TMMMM* rEJLEBZTETTE KI. A TARBABAB TABJAl! 

PlMVAK TUDOPMNVCW AKADttMXA •MMT«ITtBHNIKAI *■ 
AUTOMAT XZ AC Aft X KUTATO XNTftZKT 

- KUKKTMOnOIMJi. ELEKTKONIKAI ALKATRtBZ KERE8KEDELMI 
VALLALAT 

— "OJ *UBT" MEZOOAZDABABI TERMEUOBZOVETKEZBT OAR Z SAP 

A niKROSZAniTOBtP MOBZAKI- MENEDZSELtBI KtRDtSEIVEL AZ 
HTA SZTAKX COftV MOBZAKX FEJLE8ZTO LEANYVALLALAT FOBLAL- 
KOZIK. 



E LEIRAB A PRIHO '•*.! VERZIOJAT IBMERTETI. A FEJLEBZ- 
TOK *S A BYARTO FENNTARTJA AZON JOBAT" HOBY A BERENDE- 
ZtST *S ANNAK MOKODTETO PROBRAMJAT TOVABBFEJLE88ZE< CIJ 
LEHETOStBEKET TEREMTBEN> A MEBLtVOKET MODOBIT8A. A 
LEIRABBAN TALALHATO PROORAMOK A PRIHO BZAHITOOCPET 
VEZtRLIK. A FEJLE8ZTOK NEM 8ZAVATDLJAK. HOOY AZ ALKAL- 
MAZOTT MEBOLDABOK EREDETI KORNYEZETOKBOL KIEMEL.VE 
HELYEBEN HOKODNEK. AZ EBBOL EREDO VALAHENNYI KAR A 

rn.HAttzNAi.eT terhel i . 



A KXADO *B A SZERZOK ELBZETEB ENBEDtLYE NtLKOL TILOB A 
LEIRAST> VAOY ANNAK RtBZEIT BOKBZDRQBITANI' VIBBZAKERE- 
BO RENDBZERBEN TAROLNI • VABY BARMILYEN MAS MODON BOK- 
BZOROBITAS CtLJABOL LEMAOOLNI. 



BEVEZETfcS 



E konyv megirAsakor celunk az volt f hogy megismertessuk az 
Olvasdval a PRIHO otthoni mikroszAmitogep ROM-ban tArolt rend- 
szerprogramjAnak makodeset. Nem kivAntunk tankdnyvet irni, meg 
akkor sem, ha nehAny kerdes kapcsAn alapismeretek magyarAzatAt is 
megtalAlhatjAk a leirAsban. Ennek egyeduli celja, hogy az alkal- 
mazott kifejezesek Altalunk hasznAlt ertelmezeset megmagyarAzzuk. 
Tdrekedtunk viszont arra f hogy mindazon ismeretek, amelyre a 
PRIHO hasznAlata sorAn szukseguk lehet megtalAlhatok legyenek 
ebben a leirAsban, ne kenyszerul jenek azt tobb helyrdl osszegyftj- 
teni. (Termeszetesen figyelembe vettuk, hogy a "PRIMO fuzetek" 
sorozatban mAr megjelent a PRIHO hardver leirAs. Igy a szAmit6gep 
Aramkori reszleteinek makodesere nem tertunk ki, ahol szukseges 
volt, az emlitett konyvre hivatkoztunk. ) 

A PRIHO szoftver leirAs hArom reszre tagol6dik: 
1. Resz PRIHO BASIC nyelv leirAs 

Ebben a reszben a PRIHO '84.1 verzi6ja Altai ismert 
BASIC programozAsi nyelv leirAsa talAlhato. A leirAsban 
ismertetjuk a BASIC nyelv alapvetft jellemzdit, mukodesi 
modjait, a programsorok formAtumAt, a konstansok, 
vAltoz6k es kifejezesek alkalmazAsAnak szabAlyait. Meg- 
ad juk a PRIHO Altai ertelmezett valamennyi parancs, uta- 
sitAs es fuggveny alkalmazAsAnak formai szabAlyait, azok 
Ertelmezeset, a helytelen alkalmazAs eseten megjelend 
hibajelzeseket. Ahol az celszerftnek bizonyult, hossza- 
dalmas magyarAzat helyett, egyszeru peldAk segitsegevel 
mutatjuk be a BASIC nyelv egyes elemeinek hasznAlatAt. 



2. Resz A PRIHO szamitogep mftkodese 

A 2. Reszben a BASIC Interpreter, az Aritmetika es a 
Periferia kezelo programok makodeset ismertetjuk. Leir- 
juk a BASIC program ertelmezesenek es vegrehajtAsAnak 
f6bb lepeseit, a program memoriAn beluli tArolAsAnak 
formAtumAt, az Interpreter makodese sorAn letrejovd 
tAblAzatok felepiteset. PeldAk segitsegevel mutatjuk be, 
hogyan tArolja a PRIHO a kulonbozo tipusu numerikus 
vAltozdkat, a karaktersorozatokat. Megadjuk az alapvetd 
aritmetikai mftveleteket, fuggvenyeket vegrehajtd rutinok 
belepesi cimeit, parametereit. Ismertetjuk a periferia 
kezeld programok makodeset* a felhasznAlAsukhoz szukse- 
ges mem6ria cimek erteket, valamint ertelmezeset. 



Fuggelek 

A fuggelek a konyv ter jedelmeriek csaknem felet teszi ki. 
Itt talalhata a PRIHO BASIC hibajelzeseinek teljes lis- 
taja, a karakter- es vezerlO kddok felsorolAsa, a bil- 
lentyftzet gombjainak belsA kddja. Ide keru.lt a Fel- 
hasznal6i karakterek definialasat* a hanggenerator para- 
meterezeset ismertetd fejezet. Megtalalhatd a Fuggelek- 
ben a memdria felosztasa r a rendszer- es Interpreter 
valtozdk cime, ertelmezese* a kulcsszavak belsd k6dja 
is. Vegezetul a PRIHO valamennyi periferia kezeld prog- 
ramjanak megjegyzesekkel ellitott forrasnyelvi list a jit 
is a Fuggelek tartalmazza. 

Konyvunkben az Olvasd gondos munkank ellenere is talalhat 
hianyossagokat. Kerjuk, eszreveteleiket Juttassak el hozzanki 
megkonnyitve ezzel egyreszt a PRIHO otthoni mikroszAmitdgep fej- 
lesztesetr masreszt a mind pontosabb leirasok kesziteset. 
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PRIHO BASIC NYELV LEIRAS 



1. FEJEZET 
A PRIHO BASIC alapveto jellemzdi 



Ebben a fejezetben roviden osszefoglal juk a PRIHO BASIC 
programozAsi nyelv alapveto jellemzdit. Ismertetjuk a lehetseges 
mftkodesi modokat* a BASIC programsorok formAtumAt, a sorszAmokat. 
Megadjuk a konstansok, vAltozok es kifejezesek alkalmazAsAnak 
szabAlyait, a m&veletek vegrehajtAsi sorrendjet. 



1.1. Mftkodesi modok 

A PRIHO szAmitogep bekapcsolAsakor a PRIHO BASIC azonnal 
bejelentkezik. A kepernyo legfelso sorAban megjelenik a kovetkezo 
felirat: 



PRIMO BASIC SYSTEH '84.1 

EzutAn a kepernyd kovetkezo ures sorAnak elejen kiirodik az Ok 
felirat. Az Ok uzenet megjelenese jelzi, hogy a PRIMO kepes a 
billentyftzetrol begepelt parancsok fogadAsAra es vegrehajtAsAra. 
Ezutan a PRIHO parancs (direkt), vagy program (indirekt) uzemmod- 
ban hasznAlhatd. 

Parancs modban a PRIHO BASIC parancsait As utasitAsait nem 
elozi meg sorszam. Az igy - sorszAm nelkul - begepelt sorban lev6 
utasitAsok vegrenajtAsa a RETURN billentyft megerintese utAn 
azonnal megkezdodik. Az aritmetikai es logikai mftveletek eredme- 
nyei megjelenithetok, vagy vAltozokban tovAbbi felhasznAlAsra 
tArolhatdk, de maguk az utasitAsok vegrehajtAsuk utAn elvesznek. 
A direkt modot Altai Aban a BASIC program hibAinak keresesekor 
alkalmazzuk. Ha a PRIHO-t egyszeri kalkulAtorkent kivAnjuk hasz- 
nAlni olyan szAmitAsok elvegzesere, amelyek nem igenyelnek komp- 
lett BASIC programott ismet csak a direkt modot alkalmazhatjuk. 

Program modban a begepelt BASIC utasitAssor elejen sorszAm 
All. Az ilyen - sorszAmmal kezdddd - sort a RETURN billentyft meg- 
erintese utAn a PRIMO a program memoriAjAban tArolja. A tArolt 
BASIC program a RUN parancs begepelesevel indithat6 el. 
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1.2. Progransor formAtua 

A PRIMO BASIC programsorai a kovetkezfi formAtumiak (a 
szogletes zArojelben AU6 reszek megadAsa opcionAlis): 

nnnnn BASIC utasitAs C: BASIC utasitAsII. .. (RETURN) 

ahol nnnnn a BASIC utasitAssor decimal is sorszAma. Egynel tobb 
BASIC utasitAs is Allhat egy programsor ban, de ebben az esetben 
az egyes utasitAsokat egymAstol a (!) karakterrel kelt elvAlasz- 
tani. 

Egy PRIMO BASIC programsor tehAt mindig sorszAmmal kezdddik es a 
sor veget a RETURN billentyd megnyomAsAval jelezzitk. Egy program- 
sor maximAlis hossza 210 karakter - 5 kepernyA sor - lehet. 
(Val6jAban a programsor csak 209 karaktert tartalmazhat, a 210. 
karakter a programsor veget jelz6 kod szAmAra van fenntartva. ) 

1.2.1. Sorszaaok 

Minden PRIMO BASIC programsor sorszAmmal kezdddik. A sorszA- 
mok az egyes programsor ok memoriabeli sor rend jet jelolik ki. A 
sorszAmok ezen tCilmenoen a BASIC ugrAsoknAl es a BASIC program 
szerkesztesekor mint cimkek is hasznAlatosak. A PRIMO BASIC prog- 
ramokban a sorszAmoknak a 0... 65529 tartomAnyba es6 decimAlis 
egesz szAmoknak kell lenniuk. 

A LIST, LLIST, AUTO, DELETE es EDIT parancsokban - a kesob- 
biek szerint - a programlista sorszAmaira hivatkozunk. Ha a sor- 
szAm helyett egy pont (.) szerepel, az az aktuAlis sor sorszAmAt 
helyettesiti. (Az aktuAlis sor az utoljAra futtatott, listAzott, 
javitott sor, ill. az a sor, amelyben a PRIMO BASIC az utolso 
hibAt talAlta. ) 

1.3. Karakter kesz let 

A PRIMO BASIC karakterkeszlete betftket, szAmokat, speciAlis 
jeleket es a FelhasznAlo Altai definiAlhato karaktereket tartal- 
maz. 

A PRIMO BASIC betdnek tekinti az angol ABC kis es nagybetft- 
it. (Nem hasznAlhato bet&kent azonban a magyar ABC A, A, e, fe, i, 
6, 6, 0, 6, d, u, 0, Hbet&je. Ez utobbi karakterek csak szoveg- 
konstansokban szerepel hetnek. ) 

A PRIMO BASIC szAmjegykarakterei a 0...9 szAmjegyek. 

Kulonleges karakterekkent a PRIMO BASIC a kovetkezo jeleket 
ertelmezi : 
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Karakter Jelentese 

Betftkoz 
= Egyenlosegjel vagy ertekadas mfivelet 

+ Osszeadasjel vagy poziti,v el6jel 

- Kivonasjel vagy negativ el6jeL 

• Szorzasjel vagy csillag 
/ Osztasjel vagy tortvonal 

t Hatvanyjel vagy felfele mutate nyil 

( Nyit6zarojel 

) Csukozarojel 

X Szazalekjel vagy egesz tipusjel 

# Szamjel vagy duplapontos tipusjel 

5 Dollarjel vagy karakteres tipusjel 

! Felkialt6jel vagy egyszerespontos tipusjel 

r Vesszo 

Pont vagy tizedespont 

Idezojel 
» Aposztrof vagy :REM utasitas roviditese 

; Pontosvesszo 

: Kettospont vagy BASIC utasitasvegjel 

6 "feS" jel vagy ampersend 

? Kerdojel vagy PRINT utasitas roviditese 

< Kisebbjel 

> Nagyobbjel 

A Felhasznalo Altai definialhato karakterek karakterkonstan- 
sokban a szabvanyos karakter ekkel azonos modon hasznalhat6k. 

1.4. Konstansok 

A konstansok olyan ertekek, melyek a PRIMO BASIC program 
vegrehajtasa soran ertekuket nem valtoztatjak meg. A konstansokat 
ket tipusba sorolhatjuk: karakter konstans es nunerikus konstans. 

A karakter konstans - masneven string - betdk, szamok, speci- 
alis- es Felhasznald altal definialt karakterek idezojelek (") 
koze zart maximal isan 255 karakter hosszft sorozata. 

Pel dak: "Ez egy karakter -konstans" 
"1985. III. 11." 
"Az aposztrof ( f ) special is karakter" 

A nunerikus konstans pozitiv vagy negativ szam. A PRIMO 
BASIC numerikus konstansai nem tartalmazhatnak vesszdt* a tizedes 
vesszd he I yet t tizedes pontot kell alkalmazni. A numerikus kons- 
tansoknak harom formajuk van: 
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Egesz szaa -32768 es 32767 koze esd egesz szam. Az egesz 

szam sem tdrtreszt, sen tizedespontot nem 
tartalmazhat. 

Fixpontos szaa Pozitiv vagy negativ valds - tizedestortet 

vagy tizedespontot tartalmazd - szam. 

Lebegdpontos szaa Pozitiv vagy negativ normal - mAsneven expo- 
nent: iil is - alakban megadott szam. Egy lebe- 
gdpontos szam eldjeles egesz vagy fixpontos 
szAmbdl (mantissza), egy E betdbol es az ezt 
kovetd eldjeles egesz szAmbdl (10-es alapCi 
hatvinykitevd) all. A lebegdpontos szam kite- 
vd jenek lehetseges erteke: -38<x<37. 

Pel dak: 187.938E-7 = 0.0000187938 
-.5E8 = -50000000 
-3.2E+4 = -32000 

(Dupla pontossigA lebegdpontos konstans al- 
kalmazAsakor a kitevd eldtt 4116 E bet& he- 
lyett D bet at kell irni.) 

1.4.1. Egyszeres es duplapontos konstansok 

Egy valds numerikus konstans a PRIHO BASIC-ben egyszeres- 
vagy duplapontos lehet. Az egyszerespontos konstansok 6 szamjegy 
pontossiggal tarolddnak es 6 szamjegy re pontosan irhatdk ki, mig 
a duplapontos konstansok 16 szamjegy pontossaggal tarolddnak es 
16 szamjegy re pontosan irhatdk ki. A PRIHO BASIC a szamkonstanso- 
kat alapertelmezesben egyszerespontosaknak tekinti. 

Egyszerespontos mindazon numerikus konstans, melyre igaz az 
alabbi megillapitAsok valamelyike: 

- A szamkonstans kitevd es/vagy tipusazonositd nelkul mega- 
dott egesz vagy valds szAm. 
Normil alakban megadva a kitevd eldtt E all. 
A szamkonstans vegen egy felkialtdjel (!) all. 

Pel dak: 34578 

24.2356 

+242.35E23 

345! 

Duplapontos mindazon numerikus konstans, melyre igaz az 
alabbi megal lapitasok valamelyike: 

Normil alakban megadva a kitevd eldtt D All. 
A szamkonstans vegen egy kettdskereszt (#) All. 
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PeldAk: 1 643768531* 
-6.04567D+12 
4562.12367234* 

1.5. VAltozdk 

VAltozdknak nevezzuk a BASIC program azon szimbdlumait, amik 
olyan mennyi segeket jeldlnek, amelyek ertekuket megvAltoztathat- 
jAk. A vAltozdkat vAltozdnevekkel jeloljuk. A vAltozd erteket 
kaphat a programozdtdl (Isd. direkt uzemmdd), vagy egy mavelet 
eredmenyekent a BASIC programban. Mieldtt egy vAltozd erteket 
kapna, szAmerteke nulla. 

1.5.1. VAltozdnevek 6s tipusazonositd karakterek 

A PRIHO BASIC vAltozdnevei tetszdleges hosszasAgaak lehet- 
rteky de a rendszer csak az elsd ket karaktert veszi figyelembe. A 
vAltozdnevek az angol ABC kis- es nagybetAibdl, valamint szAm- 
Jegykarakterekbdl Allhatnak, de az elsd karakternek kdtelezden 
betanek kell lennie. A vAltozonev vegen meg egy special is tipusa- 
zonositd Jel is 41 I hat, melyek haszn4lat4t a I Abb ismertetjuk. 

A vAltozdnev nem lehet azonos egy PRIHO BASIC kulcsszdval es 
a vAltozdnev belsejeben sem Allhat kulcsszd. A PRIHO BASIC vala- 
mennyi parancs-, utasitAs-, fiiggveny- es oper4torneve kulcsszd. 

Egy vAltozd numerikus vagy karakteres erteket kepvisel het. A 
karakteres v4ltozonevek vegen egy dot I Ar Jel nek (S) kell 4llnia. A 
dollArjel egy tipusazonositd karakter, amely azt jelzi, hogy az 
adott vAltoz6 karakteres erteket kepvisel. 

A numerikus vAltozdk egesz-, egyszerespontos- es duplapontos 
ertekeket Jelolhetnek. A kuldnbdzd tipusi vAltozdkhoz rendelt ti- 
pusazonositd karakterek a kdvetkezdk: 

X Egesz tipusa vAltozd 
! Egyszerespontos vAltozd 
# Duplapontos vAltozd 

Amennyiben egy vAltozdnev vegen nines tipusazonositd karakter, LflSa. 

agy a vAltozd egyszerespontos szAmerteket kepvisel. DEf vdoci-ilois. 

PeldAk helyes vAltozdnevekre: 

ALFA! Egyszerespontos valds erteket Jelkepez 

Minimum* Duplapontos valds erteket Jelkepez 

ix Egesz erteket jelkepez 

SZS Karakteres erteket jelkepez 

X Alapertelmezes, egyszerespontos erteket jelkepez 
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PeldAk helytelen vAltozdnevekre: 

Ar fekezetes karaktert tartalmaz 

IB Nem betuvel kezdodik 

TONNA Kulcssz6t (TO) tartalmaz 

X( fervenytelen tipusazonosito karakterrel vegzodik 

A PRIHO BASIC lehet6ve teszi a vAltozok tipusazonositAsAnak egy 
mAsik m6djAt is. A DEFINT, DEFSNG, DEFDBL es DEFSTR utasitAsok 
segitsegevel egy-egy vAltozd, vagy vAltoz6k egesz csoportjAnak 
tipusa hatArozhat6 meg. Az emlitett utasitAsok reszletes LeirAsa 
a 2.2. fejezetben talAlhatd. 

1.5.2. TdmbvAltoz6k 

Egy tomb a vAltozd ertekek olyan csoportja, amelyekre azonos 
newel hivatkozhatunk. A tombon beluli valamennyi ertek kije- 
lolheto ugy, hogy a vAltozonev utAn zir6jelek kozott megadunk egy 
egesz erteket f vagy egy egesz erteket szolgAltat6 kifejezest (az 
ugynevezett indexet). Az egesz ertek a tomb egy elemi vAltozdjAt 
vAlasztja ki. Egy tombvAltozonev utAn zardjelek kozott, egymast6l 
vesszftvel elvAlasztva tobb index is megadhato. Ilyenkor tobbdi- 
menzios tombokrol beszelunk. Az index legkisebb erteke 0. 

PeldAk: T(5) a T egydimenzios tombvAltozo hatodik elemere 

utal6 vAltozonev. (A tomb indexszAmozAsa a 
ertektfil kezdddik, ezert jeloli 5 a hatodik 
elemet.) 
V(3,8) a V ketdimenzios tombvAltozd negyedik soranak 
kilencedik elemere utalo vAltoz6nev. 

Az indexek - es igy a dimenziok - maximal is szAma 255 lehet. A 
tombvAltoz6k elemeinek szAmAt a PRIHO memoriAjAnak merete korlA- 
tozza. 

1.5.3. A vAltozdk tAroloigenye 

Az alAbbi tAblAzatbol kiolvashato, hogy a kulonfele tipusa 
vAltozok tArolAsAhoz hAny byte felhasznAlAsa szukseges. A mega- 
dott szAmok csak a vAltoz6 Altai kepviselt ertek tArolAsAhoz 
szukseges tAroldterulet meretet mutatjAk, a vAltoz6 nevenek es 
egyeb parametereinek megdrzesere felhasznAlt mem6ria meretet nem. 

Tipus TAroldterulet (byte) 

Egesz 2 

Egyszerespontos 4 

Duplapontos 8 

Karakteres 3 + karaktersorozat aktuAlis hossza 
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1.6. Autoaat ileus tipuskonverzi6 

Ha szukseges, a PRIHO BASIC a numerikus konstansokat es a 
valtoz6k aktuilis ertekeit automat ikusan atalakitja egy masik 
tipusra a kovetkezo szabalyok figyelembevetelevel: 

1. Ha egy numerikus konstans erteket egy numerikus valtoz6hoz 
rendeljuk (ertekadas) es a valtoz6 tipusa elter a konstans 
tipusit6l, akkor a konstans erteke a valtozd tipusa Altai 
meghatarozott formaban keriil tarolasra. (Ha egy karakteres 
viltozdhoz numerikus erteket, vagy egy numerikus viltozdhoz 
karakteres erteket kiserelunk meg rendelni, dgy TM - Type 
Mismatch, Tipuskeveredes - hibajelzes keletkezik.) 

Pelda: 100 xX=76.548 
110 PRINT xx 
RUN 
76 

2. Az aritmetikai kifejezesek kiertekelese soran valamennyi 
aritmetikai es osszehasonlitd mftvelet operandusa azonos 
pontossagura, megpedig a kifejezesben szerepld legpontosabb 
abrazolasu ertek tipusara konvertal6dik. A kifejezes vegsd 
eredmenye is ezen legpontosabb szamabrazolasi tipusnak meg- 
felelden keletkezik. 

Peldak: 40 D=6/7x A mdvelet egyszerespontos va- 

50 PRINT D 16s adatokon hajt6dik vegre es 

RUN az eredmeny is egyszerespontos 

.857143 valds szamkent keletkezik. 

I f ' ; oa 
70 X#=6x/7! A mftvelet egyszerespontos va- I ^ 

80 PRINT X# 16s adatokon hajt6dik vegre, de j o ^ 

RUN az eredmeny duplapontos valos O ' ' " < - 

. 857 1 428656578064 sz am I esz . ^ 

3. A loQikai mftveletek opgranriiiqaikat egesz ertekke konverti l- ^^fl'^^O^n 
jAk es a mftvelet eredmenyet is egesz szam formajaban adjak x# = <?#-/^- ^o 
vissza. Az operandusoknak a -32768. . .32767 intervallumba V4 , , r w 
kell esniuk, ellenkezd esetben 0V - Overflow, T&lcsordulas - X ^ - c V & itt%)ft.[ 
hibajelzes keletkezik. ^, 

^° 

4. Amikor egy lebegopontos ertek egesz ertekke konvertal6dik, a 
lebeg6pontos szam tortresze elvesz. 

Pelda: 10 Ix=746.921 A konstans egyszerespontos va- 
20 PRINT IX I 6s, de az eredmeny egesz I esz. 
RUN 
746 
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5. Ha egy duplapontos valtozohoz egyszerespontos erteket rende- 
lunk, a keletkezd duplapontos erteknek csak az els6 hat 
szamjegye kepvisel val6di erteket. Ennek az az oka, hogy az 
atkonvertalt egyszerespontos ertek csak hat ertekes jegyet 
tartalmazott. 

Pelda: 100 A=l/3 
110 B#=A 
120 PRINT A,B# 
RUN 
.333333 .3333333432674408 

1.7. Kifejezesek *s mftveleti jelek 

Kifejezesnek nevezzuk a karakteres vagy numerikus konstansok 
es valtoz6k mftveleti jelekkel kombinalt olyan sorozatat, amely a 
kifejezes kiertekelese utan eredraenyul egyetlen karaktersorozatot 
vagy szamerteket ad. 

A mftveleti jelek az operandusokon vegrehajtandd matematikai 
vagy logikai mftveleteket jelolnek ki. A PRIMO BASIC mftveleti 
jelei a kovetkezd 6t csoportba sorolhat6k: 

1. Aritmetikai mftveletek 

2. Relacids (6sszehasonlit6) mftveletek 

3. Logikai mftveletek 

4. Fuggvenyek 

5. Karakteres mftveletek 

A felsorolt csoportokat a kovetkezdkben ismertetjuk. 

1.7.1. Arit»etikai mftveletek 

Az aritmetikai mftveletek vegrehajtasi sorrendje - preceden- 
ciaja - csdkkeno sorrendben a kovetkezo: 

Mftveleti jel Mftvelet Pel da 

t Hatvanyozas XtY 

Negalas (elojelvaltas) -X 

»,/ Szorzas, osztas X*Y X/Y 

+ f - Osszeadas, kivonas X+Y X-Y 

Ha a mftveletek el6bb felsorolt vegrehajtasi sorrendjet meg 
kivanjuk viltoztatni, ftgy zar6jeleket kel I alkalmazni. A zarojel- 
ben all6 mftveletek elsokent hajtodnak vegre. A zarojelen belul 
all6 mftveletek vegrehajtasi sorrendje azonos a tab I az at ban leir- 
takkal. 
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1.7.1.1. Null Aval osztAs, talcsordulAs 6s hiAnyz6 operandus 

Ha a kifejezes kiertekelese sorAn nulla ertekkel tor tend 
osztAs tortenik, /0 - Null Aval osztAs - hibajelzes keletkezik es 
a program tovAbbi vegrehajtAsa megszakad. 

Ha a kifejezes kiertekelese sorAn talcsordulAs kovetkezik 
be, OV - Overflow, TalcsordulAs - hibajelzes keletkezik es a 
program tovAbbi vegrehajtAsa megszakad. (Az alkalmazhat6 legna- 
gyobb szAm a +1.70141E+38). 

Ha egy kifejezes vegen maveleti jel All, MO - Missing Oper- 
and, HiAnyzd operandus - hibajelzes utAn a program tovAbbi vegre- 
hajtAsa megszakad. 

1.7.2. Re I Ac i os maveletek 

A relicios maveletek segitsegevel ket erteket hasonlithatunk 
ossze. A mavelet eredmenye egyreszt "igaz" (-1), mAsreszt "hamis" 
(0) lehet. Ez az eredmeny egy programon beluli el igaz 6 utasitAs- 
ban (Id. IF utasitAs) hasznAlhato fel. 

A relAci6s maveletek a kovetkezdk: 



Maveleti jel 


VizsgAlt relAcio 


Pel da 


= 


Egyen I 6 


X=Y 


<> 


Egyenldtlen 


XOY 




Kisebb 


X<Y 




Nagyobb 


X>Y 


{s 


Kisebb vagy egyen I 6 


X<=Y 


)= 


Nagyobb vagy egyen I 6 


X>=Y 



(Az egyenldsegjel egyben az ertekadAs mavelet jele is.) 

Amennyiben a z aritmetikai es relAci6s maveleteket egyetlen kife- 
jezesben kombinAljuk, _minden esetben eloszor az aritmetikai mttve- 
J^ etek vegrehajtAsa tortenik meg. PeldAul az 

X+YUT-D/Z 

kifejezes erteke "igaz", ha X+Y kisebb, mint a T-l osztva Z-vel. 

1.7.3. Logikai aaveletek 

A logikai maveletek segitsegevel tdbbszoros relAci6kat, 
bitmaveleteket - mAsneven Bool maveletek - hajthatunk vegre. A 
logikai maveletek bitenkenti eredmeny t szolgAltatnak, amely vagy 
"igaz" (nem nulla) vagy "hamis" (nulla) lehet. Egy kifejezesben a 
logika i maveletek az aritmetikai es a relAcios maveletek utAn 
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_hajt6dnak vegr e^ A logikai mAveletek igazsAgtAblAja a kovetkezd 
tAblAzatbdl olvashato ki. A mftveletek vegrehajtAsuk csokkeno 
sorrendjeben kerultek AbrAzolAsra. 

NOT X NOT X Logikai "NEM" 



AND X Y X AND Y Logikai "tS" 



X 




NOT X 







1 


1 







X 


Y 


X AND Y 














1 





1 








1 


1 


1 


X 


Y 


X OR Y 














1 


1 


1 





1 


i 


1 


1 



OR X Y X OR Y Logikai "VAGY" 



Amint emlitettuk a relAci6s m&veletekkel a programban elAgazAso- 
kat hozhatunk letre. A logikai m&veletek segitsegevel ket vagy 
tobb relAci6s mfliveleti eredmeny kapcsolhat6 ossze, amely vegul 
egyetlen "igaz" vagy "hamis" eredmenyt szolgAltatva felhasznAlha- 
t6 a felteteles elAgazo utasitAsban. 

PeldAk: • 100 IF Q<500 OR ALFA=6 THEN 120 
200 IF I>=0 AND JO50 THEN 330 
300 IF NOT S THEN 75 

A Logikai mftveletek mAkodesuk sorAn operandusaikat 16 bites, el6- 
jeles, 2-es komplemens kddd eg*sz ertekekke alakitjAk. Az operan- 
dusoknak a -32768.. .32767 intervallumba es6 ertekeknek kell len- 
niuk, mAskulonben OV - Overflow, Tftlcsordulas - hibajelzes kelet- 
kezik. A megadott logikai mftveletek a 16 bites operandusokon 
bitenkent - vagyis a 16 biten kulon-kulon - hajtodnak vegre. A 
keletkezo eredmeny "igaz", ha a 16 bit bArmelyiken reszeredraeny- 
kent 1 keletkezett es "hamis", ha mind a 16 biten a reszeredmeny 
volt. 

Mint lAthato a logikai mftveletek segitsegevel tetszes szerinti 
bitmintAzat alakithat6 ki. Az AND mftvelet segitsegevel egy vagy 
tobb bitet "kimaszkolhatunk" egy binAris ertekbol, mig az OR 
mftvelettel ket binAris erteket "osszefesulhetunk". A NOT mftvelet 
segitsegevel egy binAris ertek 1-es komplemenset Allithatjuk el6. 
Az alAbbiakban az elmondottak illusztrAlAsAra nehAny peldAt muta- 
tunk be. 
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39 AND 15 = 7 39 = OOOOOOOOOOlOOlll 

15 = 0000000000001111 



0000000000000111 = 7 



-1 AND 7 = 7 -1 = 1111111111111111 

7 = 0000000000000111 



0000000000000111 = 7 



10 OR 24 = 26 10 = 0000000000001010 

24 = 0000000000011000 



0000000000011010 = 26 

30 OR 30 = 30 30 = 0000000000011110 

30 = 0000000000011110 



0000000000011110 = 30 
NOT -2=1 -2 = 1111111111111110 

0000000000000001 = 1 
NOT 5 = -6 5 = 0000000000000101 



1111111111111010 = -6 



1.7.4. Fuggvenyek 



A fuggvenyek segitsegevel a megadott argument umon egy el Are 
definialt maveletet hajthatunk vegre. A PRIMO BASIC szamos beepi- 
tett fuggvennyel rendelkezik. E muveletek argumentumait minden 
esetben a fuggveny nevet koveto zarojelek koze kell helyezni. A 
PRIMO BASIC - amennyiben numerikus eredmenyt szolgaltato fugg- 
venyerteket szamit - egyszerespontos valos szamerteket ad vissza 
eredmenyul meg abban az esetben is, ha a fuggveny argumentuma 
duplapontos valos ertek volt. A felhasznalhato fuggvenyek teljes 
listaja a 2.3. fejezetben talalhato. 

1.7.5. Karakteres navel etek 

Karak teres maveleteknek azokat a mdveleteket nevezzuk, ame- 
lyek numerikus ertek he I yet t egy karaktersorozatot adnak eredme- 
nyul. A PRIMO BASIC is rendelkezik nehany karakteres muveleti 
jellelf valamint szamos karakteres fuggvennyel. 

Ket karakterkonstans vagy ket karakteres valtoz6 aktuilis 
erteke egyetlen karaktersorozatta fuzhetd ossze a "+" jel segit- 
segevel (osszefuzes=konkatenaci6) . 
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Pelda: 10 If="Boldog" : Jl=" ev" 
20 PRINT IS+JS 
30 PRINT IS+- fcj"+Jl 
RUN 

Bo I dog ev 
Bo I dog ij ev 

Karakteres ertekek osszef&zesenel ugyeljunk arra, hogy a 
letrehozandA karaktersorozat 255 karakternel ne legyert hosszabb, 
ellenkezfi esetben a PRIMO LS - Long String, HosszA karaktersoro- 
zat - hi bit jelez. 

Akarcsak a numerikus ertekek, a karaktersorozatok is ossze- 
hasonlithat6k. A karakteres osszehason litis mtveleti jelei azono- 
sak a mar megismert numerikus 6sszehasonLit6 mftveletek jelei vel: 



<> 



< = 



>= 



Karaktersorozat osszehasonlitasa az egyes karakterek ASCII 
k6djanak osszehasonlitasaval tortenik. Ha a ket karaktersorozat 
valamennyi karaktere megegyezik, a ket karaktersorozat egyenlo. 
Ha az ASCII kodok elterdk, a kisebb binaris ertekfli (binaris kodCi) 
karaktert tartalmaz6 karaktersorozat lesz a kisebb. Ha az ossze- 
hasonlitas soran az egyik karaktersorozat veget er, a rovidebb 
karaktersorozat lesz a kisebb. A karaktersorozat elejen es vegen 
4116 bet&koz karakterek is ertekesek, resztvesznek az osszehason- 
litasban. 



Peldak: "AA"<"AB" 

"Egyenlok"="Egyenlok" 

"A4<"A"' 

"kg">"KG" 

"R6vid"< "Rovidebb" 



A karakterek ASCII kodjai 
a Fuggelekben talalhatdk. 



A karaktersorozat osszehasonlitassal karaktersorozatokat nevsorba 
rendezhetunk. Mi vel azonban a magyar nyelv ekezetes karakterei az 
ASCII k6dtabtazatban - es igy a PRIMO k6dkeszleteben is - nem a 
megszokott sorrendben allnak, igy ket karaktersorozat nevsorbeli 
sorrendje csak abban az esetben donthetfi el az 6sszehasonlit6 
maveletek segitsegevel, ha bennuk ekezetes karakter nem szerepel. 

Az 6sszehasonlit6 mftveletekben szereplo valamennyi karakter kons- 
tanst idezojelek koze kell zarni. 

1.7.6. Mftveletek vegrehajtasi sorrendje 

A PRIMO BASIC mfliveleti jeleinek megismerese utan az alabbi 
tablazat a kifejezes kiertekeles soran alkalmazott teljes m&ve- 
letvegrehajtasi sorrendet mutatja be. A tablazat ban a maveleti 
jelek csokkend vegrehajtasi sorrendben allnak. 
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VegrehajtAsi sorrend Mftvelet 

1. ZAr6jelben AU6 tag 

2. Fuggvenyek 

3. t (hatvAnyozAs) 

4. - (elojelvAUAs) 

5. *, I 

6. + , - 

7. RelAci6s maveletek 

8. NOT 

9. AND 
10. OR 

Amennyiben egy kifejezesen belul azonos vegrehajtAsi szinten lev6 
maveleti jelek Allnak, a vegrehajtAs a kifejezesen belul balr6l 
jobbra tortenik. 

1.8. Programszerkesztes 

Programszerkesztesnek - editAlAsnak - nevezzuk azt a teve- 
kenyseget, melynek sorAn a PRIHO memoriAjAban orzott BASIC prog- 
ramed megvAltoztatjuk. 

1.8.1. Program irAs 

A BASIC program szerkeszteset megval6sit6 EDITOR - amely a 
PRIHO BASIC Interpreter programjAnak resze - az Ok felirat megje- 
leneset kovetden Atveszi a PRIHO vezerleset es egeszen a RUN 
parancs kiadAsAig meg is tartja azt. Minden sort, amelyet bege- 
peltunk, az EDITOR dolgoz fel. Mindazon sorok, amelyek egy 
szAmmal kezdodnek, a BASIC program ajonnan begepelt sorainak 
mindsulnek, es az EDITOR e sorokat sorszAmuk novekvd sorrendjeben 
tArolja a PRIHO memoriAjAban. 

A begepelt sorokat az EDITOR a kovetkezo eseteknek megfele- 
Iden dolgozza fel: 

1. A sort beilleszti a BASIC programba. Ez akkor fordul elfi, ha 
a sor elejen szabAlyos sorszAm All (0... 65529), es a sorszAm 
utAn legal Abb egy, betakoztdl kulonbozo karakter All. 

2. Egy meglevo sort m6dosit. Ez akkor fordul el6 f ha a BASIC 
programban van mAr ilyen sorszAma sor. Ekkor az EDITOR a 
regi sort tdrli a programb6l, es annak helyere az ajonnan 
begepelt sort helyezi. 

3. Egy meglevd sort tdrol. Ez akkor fordul el6, ha az ujonnan 
begepelt sor csak egy sorszAmbol All es ilyen sorszAma sor 
mAr van a BASIC programban. Ekkor az EDITOR torli az adott 
sorszAma sort. 
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Ha az egymAst kovetft sorok begepelese sor An a PRIMO memoriA- 
ja betel ik f DM - Out of Memory, Betelt a memoria - hibajelzes 
keletkezik, es a begepelt sor mar nem kerul be a memoriAba. 

Egynel tobb utasitAs is elhelyezhetd egyetlen programsorba, 
de ebben az esetben az egyes utasitAsokat egymAst6l a kettospont 
(:) karakterrel kell elvAlasztani . 

Egy PRIMO BASIC programsor maximAlisan 210 karakter (5 kep- 
ernydsor) hosszft lehet. Ha a sor begepelese kozben elerjuk az 
otodik kepernyosor veget, a PRIMO tovAbbi karaktereket mAr nem 
fogad el, helyette hangjelzest ad. 

A gepeles kozben tevesen leutott karaktereket a «- billentyft 
segitsegevel torolhetjuk a sorbdl. A BRK, CLS, vagy a SHIFT es «- 
billentyftk egyidejft megnyomAsa az eddig begepelt teljes sor 
t or I eset er ed meny ez i . 

1.8.2. Sorszerkesztes 

A BASIC program egy sorAnak tartalma az EDIT parancs segit- 
segevel mddosithato. A parancs a kovetkez* formAban adnata meg: 

EDIT sorszAm 

Ha az EDIT kulcssz6 utAn sorszAmot adunk meg, akkor az adott 
sorszAmft sor, mig "." megadAsa eseten az aktuAlis sor szerkeszt- 
het6. Ha a megadott sorszAmt sor nines a BASIC programban, a 
PRIMO UL - Undefined Line, NemdefiniAlt sor - hibajelzest gene- 
rAl. Ha letezik a megadott sorszAmft sor, az EDITOR a kepernyd 
kovetkezo sorAt6l kezdve kiirja a szerkesztesre kivAlasztott 
sort, majd a kurzort a kovetkezo ures kepernydsor elejere 
Allitja, es egy vezerlo billentyft megnyomAsAra vAr. Az alkalmaz- 
hatd vezerlo billentyftk a kovetkezdk: 

-» Megerintesekor a kurzor egy pozicioval jobbra lep. 
Ennek hatAsAra a regi sor aktuAlis karaktere Atkerul az 
ftj sorba. Ha a -* billentyftt folyamatosan nyomjuk, a 
leirt funkci6 ismetlodik. Ha a regi sornak mAr nines 
tovAbbi - az ftj sorba AtmAsolhato - karaktere, a -» 
billentyft ismetelt megerintese mAr hatAstalan. 

«- HatAsAra a kurzor egy pozicioval balra lep. Ennek ko- 
vetkezteben az dj sor aktuAlis utolso karaktere tor 16- 
dik. Ha a billentyftt folyamatosan nyomjuk, a leirt 
funkcid ismetl6dik. Ha az aj sorban mAr egyetlen karak- 
ter sines, a «- billentyft ismetelt megerintese mAr ha- 
tAstalan. 

i A szerkesztes ftjrakezdeset jelzi. HatAsAra az eddigi 

m6dositAsok elvesznek, ismet az eredeti Allapotft regi 
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sor elejetftl kezdhetjuk az editAlAst. A konnyebb 
tAjekozodAs erdekeben az EDITOR ismet megjeleniti az 
eredeti sort. 

SHIFT/f- A vAltoztatott sor szerkesztesenek ujrakezdeset jelzi. 
Megerintese utAn az EDITOR kilistAzza az eddigi vAltoz- 
tatasokkal a regi sort f majd a kepernyd kovetkezd sorA- 
nak elejere Allitja a kurzort. EzutAn ugy dotgozhatunk 
tovAbb, mintha most kezdenenk a szerkesztest. (A 
SHIFT/*- funkcioval vissza tudunk lepni a sor ban, ha 
eszrevesszuk, hogy el felejtettunk egy szukseges 
modositAst . > 

SHIFT/-* A szerkesztes veget jelzi. HatAsAra a regi sor meg 
hAtralev6 karakterei Atkerulnek az uj sorba, majd a 
szerkesztes befejezddik. 

RETURN A szerkesztes veget jelzi. Ha a szerkesztes megkezdese- 
kor elsokent a RETURN billentyut erintjuk meg, a szer- 
kesztes alatt AU6 sor m6dositasa nelkul befejezddik az 
editAlAs. Ha mar eldreleptunk a szerkesztett sorban, a 
RETURN megerintese az aktuAlis pontban LezArja az uj 
sort, a regi sor hatralevo resze elvesz, majd befejezo- 
dik a szerkesztes. 

BRK Kilepes a szerkesztesbdl az eddigi modositasok figye- 
lembevetele nelkul. Megerintese utAn - anelkul, hogy a 
szerkesztett sor tartalma megvAltozna - a PRIMO befeje- 
zi a szerkesztest, es ujabb parancs megadAsAra vAr. 

Ha a szerkesztes alatt nem vezerlobi I lentyut, hanem egy 
karakter billentyut nyomunk meg, akkor a szerkesztes alatt 4116 
sor a megerintett billentyu Altai jelkepezett karakterrel bovul. 
Igy a regi sort ujabb karakterek beszurAsAval megvAltoztathatjuk. 
Ha a sor bdvitese kozben elerjuk a 210 karakteres sorhoszt, a 
PRIMO tovAbbi karaktereket mAr nem fogad el, helyette hangjelzest 
ad. 

Amennyiben a regi sor sorszAmAt a szerkesztes alatt megvAl- 
toztatjuk, az editAlAs lezArAsa utAn megmarad az eredeti sor, 
mi kozben - uj sorszAmmal - a memoriAba kerul az uj sor is. 

Ha a PRIMO a BASIC program vegrehajtAsa kozben egy szintak- 
tikai - formai - hibAt eszlel, megszakitja a program tovAbbi 
futtatAsAt es SN - Syntax Error, Formai hiba - hibajelzes utAn 
automatikusan megkezdi a hibAt okozd programsor szerkeszteset. 
Ennek hatAsAra - a hibajelzes utAn - megjelenik a hibAs sor, es a 
kurzor a kepernyd kovetkezd sorAnak elejen villog, jelezve, hogy 
az EDITOR vezerld billentyu megnyomAsAra vArakozik. 
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Ha a PRIMO memdriAjAban tArolt teljes programot akarjuk 
tordlni, a NEW parancsot alkalmazzuk. A NEW parancsot Altai Aban 
egy ftj program begepelese elott celszerft hasznAlni. 

1.9. Kill on leges billentyftk 

A PRIMO billentyftzeten kuldnleges funkcidt megvaldsitd, ftn. 
vezerld billentyftk talAlhatdk. Ezek kozul nehAny feladatArdl mAr 
e fejezet megeldzd reszeben is volt sz6. Az alAbbiakban reszlete- 
sen ismertetjuk valamennyi vezerlo billentyft funkcidjAt. 



RETURN 



CLS 



UPPER 



SHIFT 



CTR 



A begepelt sor veget jelzi, 
kez6 sor elejere lep. 



HatAsAra a kurzor a kovet- 



BRK 



Kepernyd tdrles (CLS = Clear Screen). Megerintese utAn 
a kepernyo tartalma tdrlddik, a kurzor a legelsd sor 
legelsd oszlopAra - Home pozici6 - All. A CLS gomb 
megnyomAsAra a PRIMO az addig begepelt, de RETURN-el 
meg le nem zArt sort "elfelejti". 

BetftvAltd billentyft. Megerintese utAn az egyetlen ka- 
rakterkepet tartalmazd - betft - billentyftk az eddigi 
kisbetftk helyett nagybetftket jelkepeznek, ill. az eddi- 
gi nagybetftk helyett ismet kisbetftket. 

PillanatvAltd billentyft. A SHIFT billentyft erintesevel 
egyiddben megnyomott gomb vagy nagybetftt, vagy - ha a 
billentyft tdbb jelet is tartalmaz - a felso karaktert 
jelkepezi. A billentyft helyes hasznAlata: eldszdr mege- 
rintjuk a SHIFT gombot, majd azt folyamatosan lenyomva 
tartva megerintjuk a kivAlasztott mAsik billentyftt. 

Kddmddositd billentyft (CTR = Control). A CTR billentyft 
folyamatos erintese utAn megnyomott egyfunkcids betft 
billentyft Altai szolgAltatott kdd az eredeti erteknel 
64-el kisebb lesz. (Isd. PRIMO karakterkddok F-7 oldal) 
A CTR billentyft segitsegevel lehet vezerldkddokat eld- 
All itani. 

Kddmddositd billentyft. A * billentyft folyamatos erinte- 
se utAn megnyomott billentyft Altai szolgAltatott kod az 
eredeti erteknel 128-al nagyobb lesz. A * billentyft 
segitsegevel lehet pi. a 128-as kddtdl kezdddd Felhasz- 
nAl6 Altai definiAlt karaktereket a billentyftzetrdl 
begepelni. (Figyelem! A 4 billentyft a leirt kddmodosito 
hatAst csak akkor fejti ki, ha a kepernydn lAtszik a 
kurzor. A BASIC program futAsa kdzben tehAt csak akkor, 
amikor INPUT utasitAs vegrehajtAsa folyik.) 

ProgramfutAst megszakitd billentyft. (BRK = Break). 
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Parancs m6dban megnyomva a PRIMO "elfelejti" az eppen 
begepelt sort es dj sor megadasara var. Ha egy BASIC 
program vegrehajtasa folyik, a BRK billenty& megerinte- 
s*re a program futasa megszakad, es a PRIMO a kovetkezo 
sor ban megjeleniti az alabbi uzenetet: 

Break in nnnnn 

Az uzenetben alio nnnnn azon BASIC programsor sorszama, 
amelynek vegrehajtasa kozben megnyomtuk a BRK bil- 
lenty&t. A BRK megerintesevel felbeszakitott BASIC 
program a CONT paranccsal tovabbindithati. 



1.10. Hibajelz*sek 

Ha a BASIC program futasa kozben a PRIMO valamilyen hibat 
eszlel, megszakitja a programfutAst, es hibajelzes utan parancs- 
modba megy at. A hibajelzes alakja a kovetkezo: 

?? Error in nnnnn 

Az uzenetben a ?? helyen all a hiba jellegere utal6 f ket karak- 
terbol alio kdd, mig az nnnnn azon BASIC programsor sorszama, 
amelyben a hiba eldfordult. A PRIMO BASIC hibajelzeseinek teljes 
listaja a Fuggelekben talalhato. 
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2. FEJEZET 

PRIMO BASIC parancsok, utasitasok es fuggvenyek 

Ebben a fejezetben felsoroljuk a PRIHO BASIC valamennyi 
kulcsszavAt es roviden ismertetjuk ezek funkcidjAt. Az egyes 
kulcsszavaknAl megadjuk felhasznAlAsuk szintaktikai szabAlyait 
is. E szabalyok ismertetesenel a kovetkezo jeloleseket alkalmaz- 
zuk: 

A NAGYBETOKET, es - az alAbb ismertetett special is karakte- 
reken kivul megadott - irAsjeleket pontosan a Leirt m6don 
kell a BASIC programban alkalmazni 

- A hegyes zirdjelek - <»> - kozott szereplo resz ertelemsze- 
rten a megfelel6 szintaktikai elemekkel helyettesitendo 

- A szogletes zardjelek - E,l - kozott AU6 szintaktikai ele- 
mek szerepeltetese opcionalis 

- A fuggoleges vonal - I - bal, ill. jobb oldalAn 4116 szin- 
taktikai elem kozul vagy az egyik, vagy a masik alkalmazhat6 

- A haro« pont - ... - elott Alio szintaktikai elemek tobbszor 
is ismetelhetok 

* 

2.1. Parancsok 

Parancsoknak nevezzuk a PRIMO BASIC azon kulcsszavait, me- 
lyek a BASIC program szerkesztesere, ill. vezerlesere szolgAlnak. 
A parancsok programb6l tortend vegrehajtAsa utAn a program futAsa 
megszakad es a PRIHO parancs (direkt) m6dba megy At. MAskeppen 
megfogalmazva: az indirekt modban alkalmazott parancsok megsza- 
kitjAk a BASIC program futAsAt. 

AUTO C<kezddsorszai»>CF<n6vek»*ny>:] 

Automatikusan egy fijabb sorszAmot generAl a RETURN billentyG. 
minden megnyomAsa utAn. 

Az AUTO parancs elsonek a kezddsorszAmkent megadott sor- 
szAmot generAlja, majd minden tovAbbi sorszAmot az el6zohoz 
kepest a novekmennyel megnoveli. Mind a kezdosorszAm, mind a 
novekmeny ertekenek - ha nem adjuk meg - a PRIMO 10-et 
feltetelez. Ha a kezdosorszAm utAn egy vesszo All, de nem 
adtunk meg novekmenyt, a PRIMO egy korAbbi AUTO parancsban 
utoljAra megadott novekmenyt hasznAl. 

Az AUTO parancs egy csillagot ir az Altai a generAl t sorszAm 
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utAn, ha ilyen sorszAma sor mar van a BASIC programban. A 
csillag megjelenese jelzi, hogy a regi sort a PRIMO a bege- 
pelendc- bj sorra fogja cserelni. 

A sorszAmok fotyamatos generAlAsa a BRK billentyft megnyomA- 
sAval szakithat6 meg. Azt a sort, amelyben a BRK billentyat 
megerintettuk, a PRIMO mar nem tArolja el. Az AUTO parancs 
megszakitAsa utAn a PRIMO visszater parancs modba. 

CONT 

A BRK billentyft megnyomAsa, vagy egy STOP/END utasitAs 
vegrehajtAsa utan tovAbbindit ja a BASIC programot. 

Ha a program lefutAsa - vagy futAsAnak megszakitAsa - utan a 
BASIC programot modositjuk, a programot a CONT paranccsal 
tovabbinditani nem lehet. Ha megis megkiseret juk, CN - Can't 
Continue, Nem folytathatd - hibajelzes jelenik meg. 

DELETE C<sorszAm>H-<sorszAm>D 

Torli a BASIC programb6l a megadott sorszAmok kozott elhe- 
lyezkedG sorokat. 

Ha a programban a megadott sorszamil sor nem talAlhat6, vagy 
a DELETE kulcsszd utAn egyetlen sorszAmot sem adunk m4g, FC 
- Illegal Function Call, IllegAlis funkci6hivAs - hibajelzes 
keletkezik. 

Ha csak egyetlen sorszAmot adunk meg, a PRIMO torli a kivA- 
lasztott BASIC programsort. Ha ket, kotojellel elvAlasztott 
sorszAmot szerepeltetiink, a PRIMO kitorli e ket sort, es a 
koztuk elhelyezkedo valamennyi programsort. Ha egy kotojelet 
es egy azt kovet6 sorszAmot irunk a DELETE kulcsszo utAn, a 
program elso sorAt6l a megadott sorig terjedo sorok torlod- 
nek a BASIC programbol. 

EDIT (sorszAm) 

Sorszerkesztesre megnyitja a megadott sorszAma sort. 

Az EDIT parancs makodesenek reszletes leirAsa az 1.8.2. 
fejezetben talAlhato. \~M\ er\ 

LIST [<sorszaja>C-C<sorszam>:33 

KilistAzza a mem6riAban orzott teljes BASIC programot, vagy 
annak kijelolt reszet. 

Ha az egyik sorszAmot sem ad juk meg, a PRIMO a teljes prog- 
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ramot kilistAzza. Ha csak az els6 sorszAmot adjuk meg, csak 
a kivAlasztott sor jelenik meg a kepernyon. Ha megadtuk az 
elsd sorszAmot es a "-" jelet, de nem szerepel a mAsodik 
sorszAm, a kivAlasztott sor, es minden ennel nagyobb 
sorszAmft sor megjelenik. Amennyiber a "-" jelet es a mAsodik 
sorszamot adtuk meg, a PRIHO a legkisebb sor sz Ami sort6l a 
megadott sorig terjedd programreszt listAzza ki. Ha mindket 
sorszamot megadtuk, a BASIC program kivAlasztott resze fog 
megjelenni. 

A UstAzAs sorAn a PR I MO megjeUniti a kivAlasztott program- 
resz els6 sor At, majd megvizsgAl ja, hogy nyomjuk-e valame- 
lyik gombot a billentyizeten. Amig egy billentyftt meg nem 
erintunk, a kovetkezo sor ListAzAsa nem kezdddik el. Ha 
megnyomjuk valamelyik gombot, megjelenik a kovetkezo sor, es 
a PRIHO ismet a billentydzetet vizsgAlja... 

A ListAzAs a BRK billentyd megnyomAsAval megszakithatd. 
Ekkor a PRIHO parancs modba megy At. 

LLIST C<sorszAm)C-[<sorszAi»>]]] 

A sornyomtat6ra listAzza a memoriAban drzdtt teljes BASIC 
programot, vagy annak kivAlasztott reszet. 

Az LLIST parancs vegrehajtAsakor a PRIHO nem szakitja meg a 
listAzAst, ha nem nyomjuk a billentyftzet egyik gombjAt sem. 
HasznAlatAnak tovAbbi jellemzdi a LIST parancsnAl leirtakkal 
egyeznek. 



NEW 



Kitdrli a PRIHO mem6riAjAban tArolt teljes BASIC programot 
es tdrli az osszes BASIC vAltozd erteket es definiAlt 
tipusAt. 



RUN [<sorszan>] 






A PRIHO torli az osszes BASIC vAltozbt^majd megkezdi a 
mem6riAban tArolt BASIC program vegrehajtAsAt. 

Ha megadjuk az opcionAlis sorszAmot, a BASIC program vegre- 
hajtAsa a megadott sorszAmft sortdl kezdddik, mig ha a RUN 
parancs utAn nem All sorszAm, a legkisebb sor sz Ami BASIC 
sorral kezdddik a program vegrehajtAsa. Ha a BASIC program- 
ban nines a megadott sorszAmmal programsor tArolva, UL - 
Undefined Line, NemdefiniAlt sor - hibajelzes keletkezik. 
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TRON 
TROFF 



v 



Be- ill. kikapcsolja a BASIC program nyomkoveteset. 

A TRON parancs megadAsa utAn a PRIMO hegyes zArojelek koze 
zArva megjeleniti az eppen vegrehajtott BASIC programsor 
sorszAmAt. A megjeleno sorszAmokat megfigyelve eldonthetjuk, 
hogy programunk vArakozAsunknak megfeleld dton halad-e, vagy 
a vegrehajtAs celjainktol kulonbozo irAnyt vett-e. 

A TROFF parancs kikapcsolja a nyomkovetest, vagyis alkalma- 
zAsa utAn mAr nei» jelennek meg a vegrehajtott BASIC utasi 
tAssorok sorszAmai. (A NEW parancs is kikapcsolja a nyomko- 
vetest. ) 

A nyomkovetest vezerlfl parancsokat a BASIC P r °2™**ij 
elhelyezhetjuk. MAs parancsokkal ellentetben a TRON/TROFF 
vegrehajtAsa nem szakitja meg a BASIC program futAsAt. Igy 
lehetove vAlik a BASIC program egy kivAlasztott reszenek 
nyomkovetese. A TRON es TROFF parancsok alkalmazAsAval a 
program belovesenek ideje jelentosen csokkenthet6. 



2.2. UtasitAsok 

UtasitAsoknak nevezzuk a PRIMO BASIC azon kulcsszavait, me- 
lyek hasznAlata a BASIC programban eldre meghatArozott szabA yok 
s-erint vegbemeno folyamatok LejAtsz6dAsAt vAltjAk ki. Az alAbb 
felsorolt UtasitAsok tobbsege parancskent - direkt modban - is 
alkalmazhatd. 

Az utasitAsokat ABC sorrenbe csoportositva soroljuk fel. Ez 
al6l csak akkor teszunk kivetelt, ha egy utasitAshoz logikaxlag 
egy raAsik, az ABC sorrendben mAshovA tartoz* utasxtAs kapcsolo- 
dik. (pi. IF-THEN-ELSE) 

BEEP <pulzustenyezo>, <pulzusszAm>C; <pulzust ->, <pulzussz. >3. . - 

- Egy, a megadott parametereknek megfeleld monofonikus hangot 
- vagy hangsorozatot - generAl. 

Az utasitAsban egy - vagy tobb - parameterpAr adnata meg. A 
parameterpAr elsfi tagja a generAlando hang frekvenciAjAt 
hatArozza meg. A parameterpAr mAsodik tagja a keltett hang 
periAdusainak szAmAt adja meg. Ez utobbi ^"v^en a hang 
hossza. A BEEP utasitAs parametereinek a -32768. . .32767 
tartomAnyba kell esniuk, ellenkez6 esetben a PRIMO OV - 
Overflow, TftlcsordulAs - hibajelzest ad. Ha a megadott kife- 
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jezesek aktuAlis erteke tortszAm, a PRIMO az ertek egesz 
reszevel szAmol. 

A megszolald hang 501 kitoltesi tenyezojft negyszogimpulzusok 
sorozata. Ha a jel peri6dusidejet T-nek nevezzuk f a kialaku- 
16 jel forma a kovetkezd lesz: 



r 
i 



i. j/2 -»«- T/2 ■» 

Ahhoz, hogy egy kivAnt frekvenciAju jelet elft tudjunk 
Allitani, a kovetkezd kifejezest kell alkalmazni: 

<pulzustenyezo>=(T/2-35)/8.4 

Pel da: 1000 Hz frekvenciAju f 10 sec idotartama hang el&Al- 
litAsa. 

A periodusidd = 1/1000 sec -* 1000 mikrosec 

<pulzustenyez6>= (500-35 )/8. 4 -» 55 

<pulzusszAm> = 10 sec/1000 mikrosec -» 10000 
az utasitAs = BEEP 55,10000 

CLEAR Hkarakterterulet rneret)] 

A CLEAR utasitAs torli a BASIC vAltozdk erteket, definiAlt 
tipusAt es - ha megadtuk az opcionAlis parametert - beAllit- 
ja a karaktersorozatok <stringek) tArolAsAra szolgAl6 memo- 
riaterulet meretet. (A leirtakon tfil a CLEAR utasitas kikap- 
csolja a programozott hibakezelest, vegrehajt egy RESTORE 
utasitAst es torli a rendszer STACK-et. Ennek eredmenyekent 
a PRIHO megszakitja a F0R-NEXT ciklusok vegrehajtAsAt, va la- 
mint "elfelejti" a 60SUB utasitAs vegrehajtAsakor eltArolt 
visszateresi cimeket, igy a RETURN utasitAs hatAsAra nem tud 
a foprogramba visszaterni. Ezert a CLEAR utasitAst se cik- 
lusban, se szubrutinban ne alkalmazzuk. ) 

A karakterterulet meretenek legal Abb akkorAnak kell lennie, 
mint a BASIC program vegrehajtAsa sorAn az osszes karakteres 
vAltoz6 Altai tArolt karaktersorozat egyuttes merete, ellen- 
kezd esetben OS - Out of String Space, Betelt a karakterte- 
rulet - hibajelzes keletkezik. Ekkor a hiba elhAritAsa 
vegett - megfelel* argumentummal - ad junk meg egy CLEAR 
utasitAst, majd inditsuk ftjra a programot. Ha a megadott 
kifejezes aktuAlis erteke tortszAm, a PRIMO az ertek egesz 
reszevel szamol. 
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A PRIMO bekapcsol4sakor a karakterterulet merete automat i ku- 
san 50 byte lesz. 



CLOSE 



<1 




Az utasitis Lezarja a kor4bban OPEN vagy CREATE utasitassal 
megnyitott adatalloaanyt. 

Ha a CLOSE utasitas vegrehajt4sakor nines megnyitott adat- 
allomany, a PRIMO FD - File Description, Allomanyleiras - 
hibajelzest generil. Ha az adatallomanyt a CLOSE utasitissal 
nem zarjuk le, ez az adatok egy reszenek elveszteset eredme- 
nyez i . 



CLS 



Kitorli a kepernyo tartal»4t es a kurzort a bal felso sarok- 
ba 41 litja. 

Ha a kepernyo aktualis alapszine fekete, a CLS hatasara a 
teljes keperny* fekete lesz, raig feher aktualis alapszin 
eseten a kepernydterulet feher lesz. A CLS utasitas minden 
esetben megszunteti a 6-os vezerlokod - eldtorles - hatasat. 

CREATE <4llomanynev> 

Irisra megnyit egy adatallomanyt. 

Az 4llom4ny megnyitasa utan a PRIMO a magnora felirja az 
adat4llom4ny nevet es tipusat. Egy iddben csak egyetlen 
allomany lehet megnyitva. A megnyitott allominyba a PRINT* 
utasitassal lehet adatokat irni. 

Az allomanynev megadasa kotelezo. A nevet karakteres kons- 
tanssal, karakteres v4ltozoval, vagy karakteres erteket 
szolg4ltat6 kifejezessel adhatjuk meg. Az allomanynev maxi- 
mal isan IB karakter hosszd lehet, a kis-, ill. nagybetaket a 
PRIMO kulonboz6nek tekinti. Ha 16 karakternel hosszabb 41 lo- 
m4nynevet adunk meg, FC - Illegal Function Call, Illeg&lis 
funkciohivas - hibajelzes keletkezik. 

DATA < konstans > C , < konstans > 1 . . . 

A DATA utasit4s a BASIC programban karakteres es/vagy nume- 
rikus konstansokat t4rol, melyek a READ utasit4ssal - vagy 
utasit4sokkal - olvashat6k ki. 

A DATA utasit4sok a programban tetszdleges helyen elhelyez- 
hetok. Egy DATA utasit4s egym4stol vessz6vel elvAlasztott, 
tetszdlegesen sok konstanst tartalmazhat es a programban 
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tetszdlegesen sok DATA utasitas szerepelhet. A READ utasitas 
a DATA utasitasokat sorszamuk novekvo sorrendjeben olvassa 
kit es az egyes DATA utasitasokban alio konstansokat egyet- 
len osszefuggd sorozatnak tekinti fuggetlenul attol , hogy 
hAny konstans all egy sorban, vagy hogy a programban hoi 
helyezkedik el a kovetkezo DATA utasitis. 

A DATA utasitast kovetd konstanslistaban a numerikus kons- 
tansok egesz, fixpontosr vagy lebegfipontos formaban adhatok 
meg, de kifejezesek new szerepeltethetok. A karakteres kons- 
tansokat c s ak abban az esetben kell a DA TA ut asitasban 
idezojelek koze zarnH ha vessz6t, kettospontot, vagy 
ertekes vezeto, ill. koveto betdkozoket tartalmaznak. 



? 



A READ utasitasban szereplo valtoz6k tipusanak (numerikus 
vagy karakteres) meg kell egyeznie a DATA utasitasban soron- 
kovetkezd konstans tipusaval, ellenkezo esetben SN - Syntax 
Errorf Formai hiba - hibajelzes keletkezik. A DATA utasita- 
sok kiolvasasa a legkisebb sorszamd DATA utasitast6l kezdo- 
dik. A RESTORE utasitas azonban ezt megvaltoztathatja, meg- 
jeldlve az elfiszor kiolvasando DATA utasitast. 

DEFDBL (kezd6betd)E r (kezdobetd)]... Kkezdobetd^kezddbetd)^ 
DEFINT ( kezdobetd) E, (kezdobetd)]... I ( kezdobetd )-( kezdobetd) 
DEFSNG ( kezdobetd) C, (kezdobetd)]. . . I (kezdobetd >-< kezdobetd) 
DEFSTR (kezdobetd)C, (kezdobetd)]... I ( kezdobetd >-( kezdobetd) 

Rendre duplapontos, egesz, egyszerespontos, ill. karakteres 
valtozokent definial minden olyan valtoz6t, amely az utasi- 
tasban megadott betdk egyikevel kezdddik. 

A kivant kezddbetdket ketfele formaban is meghatarozhatjuk: 

- a kezdobetdket egymast6l vesszovel valasztjuk el 

- kezdobetd tartomany kezdd- es vegkarakteret a "-" karak- 
terrel kapcsoljuk ossze. 

Peldak: DEFDBL A,B,K A,B,K kezdetd valtoz6k duplapontosak 
DEFINT I-N I,J...N kezdetd valtozok egeszek 
DEFSTR S-U,Z S,T,U,Z kezdetd valtoz6k karakteresek 

A DEFxxx utasitassal tipusazonositott valtoz6k BASIC prog- 
rambeli hasznalatakor nem szukseges a valtozdneyek vegen 
tipusazonosito karaktert megadni. Ha meg is szerepeltetunk a 
valtozonev vegen tipusazonosit6 karaktert, az felulbiralja a 
DEFxxx utasitasban kijelolt tipust. A tipusazonosito karak- 
terek felsorolasa az 1.5.1. fejezetben talalhat6. 
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Q)M VR(S","}; 



DIM Undexelt v4ltozd>C,<indexelt vAltozd)].. 



MeghatArozza a programban hasznAlt tombok dimenzioszAmAt, es 
az egyes dimenzi6k maximal is elemszAmAt f valamint helyet 
foglal a definiAlt tomb szAmAra. 

A dimenzionAlt tomb minden eleme kezdderteket kap. Ez nume- 
rikus tomb eseten a f karakteres tomb eseten az iires 
string. 

A PRIMO BASIC-ben egy tomb maximal isan 255 dimenzios lehet, 
a tomb osszes elemenek szAmAt csak a mem6ria merete korlA- 
tozza. 

Ha egy olyan indexelt vAltoz6t alkalmazunk, amely meg nem 
szerepelt egy DIM utasitAs indexelt vAltoz6 UstAjAban, 
akkor a PRIMO ezen tomb minden dimenzidjAban a maximal is 
elemszAmot 10-nek tekinti. Abban az esetben, ha e tomb 
valamelyik indexe a kesobbiekben meghaladja a 10-es erteket, 
BS - Bad Subscript! Hibas index - hibajelzes keletkezik. Az 
indexek minimal is erteke minden esetben 0. 

Ha a DIM utasitasban olyan tomb meretet probAljuk meghata- 
rozni, amely korabban - akar automat ikusan, akAr Altalunk - 
mAr dimenzionAlt, DD - Double Dimensioned! Tomb ajradimenzi- 
onalas - hibajelzes keletkezik. 

Ha a PRIMO memoriAjAban a tomb elhelyezesehez nines mAr 
elegendd hely, 0M - Out of Memory* Betelt a memoria - hiba- 
jelzes jelenik meg. 



END 



Megallitja a BASIC program futAsAt. 

Az END utasitAs a BASIC programban tetszoleges helyen 
Allhat, valamint egy programban tobb END utasitAs is alkal- 
mazhato. Ellentetben a STOP utasitAssal, az END hatAsAra nem 
jelenik meg a "Break in nnnnn" Qzenet, csak az Ok felirat. A 
program vegen az END utasitAs szerepeltetese opcionAlis. 

ERROR (kifejezes) 

A BASIC program futAsa kozben a megadott k6dil hibajelzest 
vAltja ki. 

A kifejezesnek 0-nAl nagyobbnak es 256-nAl kisebbnek kell 
lennie. Ha a kifejezes erteke megegyezik egy szabvAnyos 
PRIMO BASIC hibakoddal, meg jelenik a megfelelo hibajelzes. 
Amennyiben a megadott ertekhez nines szabvAnyos hibajelzes 
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rendelve, UE - User Error r FelhasznAldi hiba - jelzes kelet- 
kezik. Ha a megadott kifejezes aktuAlis erteke tortszAm, a 
PRIHO az ertek egesz reszevel szAmol. 

FOR <v4ltozo>=x TO y CSTEP z] 



NEXT [<valtoz6>[,<valtoz6 >]...] 

Ciklusszervezd utasitAspAr. Lehetdve teszi, hogy a FOR es 
NEXT utasitAsok kozott elhelyezkedd, tetszdlegesen sok BASIC 
utasitAst a FOR utasitAs param£terei Altai meghatArozott 
alkalommal a PRIHO ismetelten vegrehajtsa. 

Megjegyzes: A FOR es NEXT utasitasokban ciklusvAltozdkent 
egesz* vagy egyszerespontos skalar vAltoz6k szerepelhetnek. 
Az x f y es z betak numerikus erteket szolgiltat6 kifejezese- 
ket jelolnek. 

A FOR kulcsszo utan alld vAltoz6 a ciklusvAltoz6. Az els6 
kifejezes (x) a ciklusvAltoz6 kezdeti erteke, mig a masodik 
kifejezes (y) a vAltozd vegerteke. A FOR utasitAst kovet6 
utasitAsok a soronkovetkezo NEXT utasitAsig vegrehajt6dnak, 
majd a ciklusvAltozi erteke a STEP kulcsszdt koveto kifeje- 
zes (z) ertekevel megnovelodik. Ezutin a PRIHO megvizsgal ja, 
hogy a ciklusvAltoz6 erteke meghaladja-e a vegerteket (y). 
Ha meg nem, a program vegrehajtAsa a FOR utasitast koveto 
resztol ismetlddik. Amennyiben a ciklusvAltoz6 pillanatnyi 
erteke meghaladja a vegerteket, a BASIC program a NEXT 
Lit as it As utAn Alio els6 utasitast6l folytat6dik. Ha a FOR 
utasitAsban nem adtuk meg a Lepeskozt, azt a PRIHO 1-nek 
tekinti . 

Ha a lepeskoz erteke negativ, a ciklusvAltoz6 erteke a 
lepeskozzel csokken. A ciklusbdl torteno kilepes feltetele 
ebben az esetben az, hogy a ciklusvAltozo aktuAlis erteke a 
vegerteknel kisebb legyen. erteka lepeskoz vegtelen cik- 
lust eredmenyez. 

A ciklus magja egyszer abban az esetben is vegrehajtAsra 
kerul, ha a ciklusvAltozd kezdoerteke nagyobb, mint a 
vegertek. 

A FOR. ..NEXT ciklusok egymAsba Agyazhatok, vagyis egy ciklus 
belsejeben - magjAban - lijabb FOR. ..NEXT ciklusok Allhatnak. 
Ha ciklusokat egymAsba Agyazunk, minden ciklusnak a mAsiktol 
eltero nevfl. ciklusvAltoz6val kell rendelkeznie. Egy ciklus 
magjAban elhelyezkedo ciklusnak meg a kulsd ciklusmag vege 
eldtt be kell fejez6dnie. Az egymAsba Agyazott ciklusok 
azonos vegponttal is rendelkezhetnek, ebben az esetben a 
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ciklusvAltoz6k egyetlen NEXT utasitAsban is felsorolhatok. A 
ciklusok egymAsba AgyazAsAnak melyseget csak a rendelkezesre 
Alio memoria merete korlAtozza. 

A ciklus magjAbdl felteteles vezerlesAtado utasitAssal meg a 
ciklus "lejArta" elott ki lehet ugrani. Tilos azonban egy 
ciklus mag j Aba a FOR utasitAs megkerulesevel belepni. 

A NEXT utasitas utan nem kotelezo a ciklusvAltoz6 megadAsa. 
Ebben az esetben a NEXT az utoljAra megnyitott ciklust zArja 
te. Ha a PRIMO a BASIC programban egy FOR utasitas vegrehaj- 
tasa elfitt eszlel NEXT utasitAst, NF - Next Without FOR, FOR 
nelkuli NEXT - hibajelzest general. 

Ha ciklusvAltoz6kent duplapontos val6s vAltozot adunk meg, 
TM - Type Mismatch, Tipuskeveredes - hibajelzes keletkezik. 
Ha a ciklusvAltozo helyen indexelt vAltoz6 all, SN - Syntax 
Error, Formai hiba - hibajelzes jelenik meg. 

60SUB (sorszam) 



RETURN 



Ugras a megadott sorszAmii BASIC sorban kezdodo szubrutinba, 
es visszateres a szubrutinb6l. 

A megadott sorszAmnak egy szubrutin els6 sorAnak kell len- 
nie. A szubrutin a BASIC program bArmely pontjArol, tetszo- 
legesen sokszor meghivhat6. Egy szubrutin mAsik szubrutint 
is hivhat, ilymodon a szubrutinok egymAsba Agyazhatok. Az 
egymAsba AgyazAs melyseget csak a rendelkezesre 4116 mem6ria 
merete korlatozza. 

A RETURN utasitas a szubrutinbil val6 visszateresre szolgAl. 
A RETURN hatAsAra a vezerles az utoljAra vegrehajtott 60SUB 
utasitAst koveto BASIC utasitAsra kerul vissza. Egy szubru- 
tin egyneL tobb RETURN utasitAst is tartalmazhat, ha a 
szubrutin logikai felepitese ezt szuksegesse teszi. Egy 
szubrutin a BASIC program bArmely reszen elhelyezkedhet, de 
ugyeljunk arra, hogy a foprogram ne "csorogjon rA" a szubru- 
tinra. Ezt a szubrutin els6 sorAt megelozfi BASIC sorba 
elhelyezett 60T0, END vagy STOP utasitAssal erhetjuk el. Ha 
a PRIMO RETURN utasitAst egy GOSUB utasitAs vegrehajtAsa 
elfitt eszlel, R6 - RETURN without GOSUB, GOSUB nelkuli 
RETURN - hibajelzes keletkezik. Ha a BASIC programban nem 
szerepel a GOSUB kulcsszd utAn megadott sorszAma sor, UL - 
Undefined Line, NemdefiniAlt sor - hibajelzes keletkezik. 
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GOTO < sorszAm) 

- Feltetel nelkuli vezerlesAtadAs a BASIC program megadott 
sorszAmu sorAra. 

Ha a kivAlasztott BASIC sor egy vegrehajthat6 utasitast 
tartalmaz, a program futAsa ezen utasitAstol folytat6dik. Ha 
az adott sor ban egy nem vegrehajthato utasitAs - DATA, REM - 
all, a programfutAs ezen utasitast koveto els6 vegrehajthato 
utasitastol folytat6dik. Ha a BASIC programban nem szerepel 
a GOTO kulcsszi utan megadott sorszAmu sor, UL - Undefined 
Line, NemdefiniAlt sor - hibajelzes keletkezik. 

IF < kifejezes) THEN <utasitAs)C: (utasitAs):]. .. I < sorszAm) 

CELSE <utasitas)[:<utasitas>]... KsorszAra)] 

IF (kifejezes) GOTO <sorszAm> 

CELSE <utasitAs)C: (utasitAs)]... KsorszAm)] 

Vegrehajt egy don test, es a BASIC programot a dontes ered- 
menyetol fuggden a program ket kulonbozd pontja kozul az 
egy i ken folytatja. 

Ha az IF kulcsszot koveto kifejezes erteke nem nulla - 
logikai IGEN -, a program a THEN-Ag - a THEN kulcsszo utAn 
AU6 programresz - vegrehajtAsAval folytat6dik (ha GOTO 
kulcsszot szerepeltetunk, a megadott sorszAmu sortil folyta- 
t6dik a vegrehajt As). A THEN kulcsszdt vagy egy ugrAsi cim - 
sorszAm -, vagy egy, ill. egymAst6l kett&sponttal elvAlasz- 
tott tobb BASIC utasitAs kovetheti. Amennyiben az IF 
kulcssz6t koveto kifejezes erteke nulla - logikai NEM -, az 
ELSE-Ag - az ELSE kulcssz6t koveto resz - hajtidik vegre. Ha 
az IF utasitAsban nem adtuk meg az opcionAlis ELSE-Agat, a 
kovetkezo BASIC sortol folytatodik a program vegrehajtAsa. 

Az IF. ..THEN. ..ELSE utasitAsok egymAsba Agyazhat6k, vagyis 
egy THEN-, ill. ELSE-Agban djabb IF. . .THEN... ELSE utasitAsok 
Allhatnak. Az egymAsba AgyazAs melyseget csak a BASIC prog- 
ramsor hossza - 210 karakter - korlAtozza. Ha az egymAsbaA- 
gyazott IF. . .THEN. . .ELSE utasitAsokban a THEN - es ELSE-Agak 
szAma eltero, m ind en ELSE az ot megelozo, hozzA leqkozeleb b 
es 6 IF utasitAshoz kapcsol6dik. PI. a kovetkezo utasitAs, 

IF X=Y THEN IF Y=Z THEN PRINT "X=Z" ELSE PRINT "XOZ" 

nem irja ki az XOZ uzenetet, ha XOY-al. Csak akkor jelenik 
meg az XOZ, ha X=Y es YOZ. 

Ha a TH E N vagy ELSE-Agat sorszAm koveti, es a BASIC prog- 
ramban nines a megadott sorszAmmal kezdddd sor, UL - Undef- 
ined Line, NendefiniAlt sor - hibajelzes keletkezik. 
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INPUT C"<nagyariz6 szoveg)"? ]<valtozo>[, <valtoz6>3... 

A BASIC program futasa atatt adatbevitelt hajt vegre a bil- 
lentyazetrol. 

Amikor a PRIMO a BASIC program vegrehajtasa soran egy INPUT 
utasitast eszlel, felfuggeszti a programfutast, es a keper- 
ny6n egy "?" karakter megjelenitesevel figyelmezteti a Fel- 
hasznal6t, hogy adatbevitelre var. Ha az utasitasban magya- 
raz6 szoveget is megadtunk, az a "?" elott jelenik meg. 
Ezutan a kivant adatok a billentyftzeten begepelhet6k. Az 
adatsor veget a RETURN billentya megnyomasaval jelezhetjuk. 

A billentyizetrol bevitt adatokat rendre az INPUT utasitast 
koveto valtozolista elemei - mint aktualis erteket - veszik 
fel. A valtozolista elemeit egymast6l vesszAvel kell elva- 
lasztani. 

A valtozdlistaban numerikus es/vagy karakteres valtozok - 
beleertve az indexelteket is - szerepeltethetok. A valtoz6k 
tipusanak rendre meg kell egyeznie a begepelt adatok tipusa- 
vaL. (A begepelt karakteres adatokat csak abban az esetben 
kell idezojelek koze zarni, ha vesszot, kettospontot, vagy 
ertekes vezetfi, ill. koveto betftkozoket tartalmaznak. ) 

Ha a begepelt adat tipusa es a valtoz6listaban soronkovetke- 
z6 valtozo tipusa eltero - numerikus helyett karakteres - a 
"?REDO" uzenet jelenik meg t majd a PRIMO az adatok ismetelt 
begepelesere var. 

Pelda: 100 input "x, y";x,y 4 -be • ^^ LeMet 
110 print X+Y VWCIft CXldt" eS feoOet 



£-t ^exoU) space -kct 
ok ave^sX. \M&y Vxs-ve&zl 



run 

x, y? 55 f 5z6veg 

?RED0 

x, y? 55,12 



Ha a billenty&zetrol tobb adatot gepelunk be, mint 
ahany valtoz6 az INPUT utasitas utan talalhato, a PRIMO az 
"TExtra ignored" uzenet megjelenitese utan - a felesleges 
adatokat figyelmen kivul hagyva - folytatja a BASIC program 
vegr eha j t asit . 

Amennyiben kevesebb adatot adunk meg, mint ahany valtozd az 
IhPUT utan ill, a PRIMO ket kerdojel megjelenitesevel jelzi, 
hogy tovabbi adatok bebillentyftzesere var. 

Az INPUT utasitas vegrehajtasat a BRK billentya megnyomasa- 
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val felbe lehet szakitani, ekkor a PRIHO visszater parancs 

m6dba. Ha ezutAn begepeljuk a CONT parancsot, a program 

vegrehajtAsa ismet a megszakitott INPUT utasitAst6l folyta- 
t6dik. 

Ha INPUT utasitAst direkt modban pr6bAlunk megadni, ID - 
Illegal Direct, Direkt modban nen alkalnazhat6 - hibajelzes 
jelenik meg. 

INPUT* <valtoz6>C,<valtoz6>]... 

Az utasitAs adatok beolvasAsAt teszi lehetove egy korAbban 
OPEN utasitAssal megnyitott adatAl lomAnybAl. 

Az INPUT* utasitAs mdkodese - azzal a kulonbseggel, hogy az 
adatok forrAsa nem a bitlenty&zet, hanem a magno - lenyege- 
ben azonos az INPUT utasitAs m&kodesevel, de termeszetesen 
az utasitAs vegrehajtAsakor nera jelenik meg a kepernyon a 
"?" karakter, es nem adhat6 meg az INPUT* utAn magyarAz* 
szoveg. Egyebekben Id. az INPUT utasitAst. 

Ha a programban meg nem nyitottuk meg az adatAl I omAnyt, a 
PRIMO FD - File Description, AllomAnyleirAs - hibajelzest ir 
a kepernyore. 

Amennyiben az adatAl I omAnyban mAr nines annyi adatelem ahAny 
vAltoz6 a vAltoz* listAban All, a PRIHO FD - File Descrip- 
tion, AlloaanyleirAs - hibAt jelez. 

[LET] <vAltozo>=<kifejezes> 

A megadott vAltoz6 felveszi az egyenlftsegjel jobb oldalAn 
Alio kifejezesaktuAlis erteket. 

Az ertekadAs mftveleteben nem kotelezo a LET kulcsszo szere- 
peltetese, a PRIMO az "=" jel megjelenesebol is felismeri, 
hogy ertekadAst kell vegrehajtania. 

A maveletben a vAltozo helyen tetsz6leges tipusCt, egyszera 
vagy indexelt vAltoz6 Allhat. Ha a vAltozo tipusa es a 
kifejezes Altai szolgAltatott ertek tipusa elter - vagyis az 
egyik numerikus, mig a mAsik karakteres - a PRIMO TM - Type 
Mismatch, Tipuskeveredes - hibajelzest generAl. Amennyiben 
nines tipuskeveredes, de a numerikus vAltozo tipusa es a 
kifejezes tipusa eltero (egesz, egyszerespontos, duplapon- 
tos), az i.6. fejezetben leirtak szerint a PRIMO automatikus 
tipuskonverziot hajt vegre. 
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LOAD C<programn*v>3 42^5" 

Magn6r6l betolt egy BASIC programot. 

A LOAD utasitAs hatAsAra a PRIMO kitorli a memoriAjAban 
orzott BASIC programot - NEW -, majd beolvas a magndr6l egy 
BASIC programot. Ha a LOAD kulcsszo utAn megadjuk a betol- 
tendo program nevet, a PRIMO azt a BASIC programot olvassa 

be, amelynek neve a magnon soronkovetkezo programok koziil 
elsGnek bizonyul azonosnak a megadott n*vvel. A ket nev 
abban az esetben azonos, ha: 

- egyenlo hossz&ak es a karakterek rendre azonosak 

- a megadott nev rovidebb, mint a magnon soronkovetkezo 
program neve, de a hosszabb nev els6 reszenek karakterei 
rendre azonosak a rovidebb nev karakterei vel . 

A programn evet kar akteres konstanssal, kar a kteres vAltoz 6- 
val, vagy k arakteres e rtekeF~IzolgAltat6 kifejezessel adhaT - 
. jukmeflx- A programrfeV maximal isan 16 karakter hosszii lehet, 
a kis-, ill. nagybet&ket a PRIMO kulonbozonek tekinti. Ha 16 
karakternel hosszabb nevet adunk meg, FC - Illegal Function 
Call, Illegalis funkciohivAs - hibajelzes keletkezik. Ha a 
LOAD utasitAsban nem adunk meg programnevet, a PRIMO a 
magnon soronkovetkezo programot tdlti be a memoriaba. 

Betolteskor a kepernyc legalso soraban a 

bb hh FOUND: <progrann&v> 

uzenet jelenik meg. bb a beolvasott blokkok szAma, hh a hi- 
bas blokkok szAma. Ha az izenetben a FOUND helyett SKIP lAt- 
hato, a PRIMO egy, a megadott ol eltero nev& programot 
talAlt, amelyet Atlep, hogy megtalAlja a keresett programot. 

(A LOAD utasitAs segitsegevel lehet a kepernyore tolteni a 
kor Abban SAVE SCREEN utasitAssal magnira kimentett kepernyo- 
tartalmat is. A LOAD alkalmas a magnoszalagon lev6 gepi kodu 

- nem BASIC - programok betoltesere is. 1 1 yen formAtumii 
programot azonban a PRIMO BASIC interpretere nem tud letre- 
hozni. Erre a celra egyeb programok - pi. ASSEMBLER - alkal- 
mazhat6k. ) 

LPRINT [(kifejezesek listAja)] 

LPRINT USING (karakteres kifejez*s>;<kifejez*sek listAja) 

A felsorolt kifejezesek erteket a nyomtat6ra listAzza. 

Az utasitAsok - azzal a kulonbseggel , hogy az adatok nem a 
kepernyon, hanem a nyomtatdn jelennek meg - azonosak a PRINT 
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es PRINT USING utasitAsokkal. Ez utobbiak reszletes leirAsa 
a fejezet kesobbi reszeben talalhat6. 

ON ERROR GOTO <sorszAm> 

- Lehetdve teszi a BASIC programban elftfordulo hibAk programo- 
zott kezeleset, es meghatArozza a hibakezelo rutin kezddsor- 
szAmAt. 

A programozott hibakezeles bekapcsolAsa utin bar me I y hiba - 
meg a direkt mid ban eszlelt szintaktikai hiba is - ugrAst 
eredmenyez a hibakezeL6 rutinra. Ha az ON ERROR GOTO utasi- 
tAsban megadott sorszAmu sor nines a BASIC programban, UL - 
Undefined Line, NemdefiniAlt sor - hibajelzes keletkezik. 

Ha a korAbban mar bekapcsolt programozott hibakezelest meg 
kivAnjuk szuntetni, ezt az ON ERROR GOTO utasitAs megada- 
sAval tehetjuk meg. (A RUN es NEW parancs, valamint a CLEAR 
utasitas is kikapcsolja a programozott hibakezelest.) Az ezt 
kovetften eszlelt hibak mar a BASIC program futasanak megsza- 
kadasat, es a hibara jellemz6 uzenet megjelerteset eredm£nye- 
zik. Ha az ON ERROR GOTO utasitAst egy hibakezelo rutinban 
adjuk meg, a BASIC program tovabbi vegrehajtAsa megszakad, 
es megjelenik a hibarutinba ugrast kivAlt6 hibara jellemz6 
uzenet. 

Ha a PRIMO a hibakezelest vegzo rutinban eszlel hibit, 
megjelenik a hibajelzes, es a program tovabbi vegrehajtAsa 
megszakad, vagyis a hibakezeld rutinban elkovetett hibAk 
programozottan nem kezelhetok le. 

A programozott hibakezelest vegrehajtd BASIC programresz KCSmM<f 

logikai veget a RESUME utasitas jelzi (reszletesen Id. e iBrL} <v2 
fejezet kesobbi reszeben). Ha egy hibakezelo rutinban a pp ^Umk\ 

PRIMO a BASIC program fizikai veget - nines mar az iment t/c/ ^ UaiPKno^, 
vegrehajtott programsornAl nagyobb sorszAmu sor - eszleli, 
NR - No RESUME, LezAratlan hibakezeles - jelzest generAl. 

ON (kifejezes) GOTO <sorszAm)C, (sorszAm)]. . . 
ON (kifejezes) GOSUB <sorszAm>C, <sorszAm>]. . . 

UgrAs a sorszAmlistAban megadott sorszAmok valamelyike Altai 
kijelolt BASIC programsorra. (TobbirAnyu elAgazAs. ) 

A kifejezes aktuAlis erteke hatArozza meg, hogy a sorszAm- 
lista hAnyadik elemet kel I ugrAsi cimkent alkalmazni. 
PeldAul, ha a kifejezes aktuAlis erteke negy, a sorszAmlista 
negyedik el erne Altai meghatArozott BASIC programsort6l foly- 
tatodik a program vegrehajtAsa. (Ha a kifejezes aktuAlis 
erteke tortszAm, a PRIMO az ertek egesz reszevel szAmol.) 
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Az ON. ..60SUB utasitAsban a sorszAmlista minden elemenek egy 
szubrutin kezdosorszAmAt kell megjeldlnie. 

Ha a kifejezes aktuAlis erteke nulla, vagy nagyobb, mint a 
sorszamlista elemeinek szAma - de kisebb, mint 256 -, a 
program vegrehajtAsa az ON. . . GOTO/GOSUB utasitAst koveto 
elso vegrehajthat6 utasitast6l folytat6dik. Ha a kifejezes 
aktuilis erteke nagyobb, mint 255, FC - Illegal Function 
Calif II legal is funkcifthivas - hibajelzes keletkezik. 

OPEN [<allom&nynev>3 

OlvasAsra megnyit egy adatillomanyt. 

Az AllomAny megnyitAsa utAn a PRIMO a magn6n megkeresi a 
megadott nevfli AllomAnyt. Egy id6ben csak egyetlen AllomAny 
lehet megnyitva. A megnyitott AllomAnybdl az INPUT* utasi- 
tAssal lehet adatokat olvasni. 

Az allomanynev megadasa, valamint a betoltes alatt a keper- 
ny6 Legalso sorAban megjeleno uzenet ertelmezese azonos a 
LOAD utasitAsnAl leirtakkal. 

OUT <port-c im> » <adat > C , <port-c im> , <adat > 1 . . . 

Kikuld egy adatbyte-ot a megcimzett output portra. 

A port-cimnek es az adatnak a 0...255 intervallumba kell 
esnie. Amennyiben az ertekek valamelyike meghaladja az el6- 
irt szAmerteket, FC - Illegal Function Call, Illegalis funk- 
ci6hivAs - hibajelzes keletkezik. Ha valamelyik ertek 
tortszAm, a PRIMO a megadott ertek egesz reszevel szAmol. 

POKE <mem6riacim>,<adat>[,<adat>3... 

- Kiir egy - vagy tobb - adatbyte-ot a megadott memoriae imre. 
Ha tobb adatot adunk meg, azok a memdria egymAst koveto 
cimeire kerulnek. 

A memoriAba kerulo adatoknak a — 255 intervallumba kell 
esniuk, mert mAskulonben FC - Illegal Function Call, Illega- 
lis funkci6hivAs - hibajelzes keletkezik. A mem6riacim 
ertekenek a -32768. . .32767 interval I umban kell lennie, 
mAskulonben OV - Overflow, TilcsordulAs - hibajelzes kelet- 
kezik. Amennyiben valamelyik kifejezes aktuAlis erteke 
tortszAm, a PRIMO az ertek egesz reszevel szAmol. 

Ha a memoria 32767 feletti reszebe kivAnunk adatokat elhe- 
lyezni, a mentor iacimbfi I 65536-ot ki kell vonni. 
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Pelda: a kivAnt memdriacim=42678 

a megadandd memdriacim=4267B-65536 ■* -22858 

PRINT Kkifejezesek listaja>] 

A megadott kifejezesek aktuAlis erteket a kepernydre listAz- 
za. 

Ha a PRINT kulcssz6t nem kdveti a kifejezesek ListAja, a 
kepernydn egy ures sor jelenik meg. Ha megadtunk kifejezese- 
ket, azok aktuAlis erteke meg jelenik a kepernydn. A listAban 
numerikus es/vagy karakteres erteket szolgAltatd kifejezesek 
allhatnak. (Ha karakteres konstansokat alkalmazunk, azoknak 
idezdjelek kdzdtt kell Allniuk.) 

A kifejez£slistAban egymAst kdvetd elemek megjelenitesekor 
azok kepernydn vald elhelyezkedese a ki fejezeslistAban al- 
kalmazott kdzpontozAs fuggvenye. A PRIMO BASIC a kepernydso- 
rokat 16 karakter szelessegft zdnAkra osztja. A ki fejezeslis- 
taban egy vesszd ( f ) azt eredmenyezi, hogy a kdvetkezd 
kiirAsra keruld ertek a sor on kdvetkezd zdna elejen jelenik 
meg. <Ha a kepernydsoron belul mar nines Cijabb zona, a PRIHO 
a kiirast a kdvetkezd sorban folytatja. Ha betel t a keper- 
nyd, a PRIHO a keptartalom alsd 15 sor At egy sorral felfele 
tolja - scroll -. ) A pontosvesszd (;) hatAsAra a kdvetkezd 
kiirAsra keruld ertek kdzvet'lenul az eldzdleg kiirt ertek 
utAn fog megjelenni. (A PRIMO e gy numerikus erteket csak 
akkor ir - pontosvess zo alkalmazAsa eseten - kdzvetlenul az 
eldzdleg kiirt erteTTmdge, ha a megjelerTitendd szAm meq _ 
el f er_a_Jc£g ernydsorban . Ellenkezd esetben az ertek a kdvet- 
kezd sor elejen tog megjelenni.) 

Ha a kifejezeslistAt vesszd, vagy pontosvesszd zArja, a 
kdvetkezd PRINT utasitAs a kiirAst ugyanezen kepernyosor 
megfeleld pozicidjAban kezdi - ha ott meg van megfeleld 
mennyisegu hely -. Amennyiben a kifejezeslista vegen se 
vesszd, se pontosvesszd nines, a kiiratAs utAn a kurzor a 
kdvetkezo kepernydsor elejere All. Ha a kiiratandd adatok 
nem fernek el egyetlen kepernydsor ban, a PRIHO a megjeleni- 
test a kdvetkezo kepernydsorban folytatja. 

A kiirt szAmok ut An jgindfiD— fisetben egy betakdz karakter All. 
Pozitiv szAm elejen - az eldjel helyen - egy betakdz, nega- 
tiv szAm elejen a negativ eldjel jelenik meg. 

A megjelenitesi formAtumot az eddig leirtakon til a TAB(i) 
fuggvennyel is vezerelhetjuk. A TAB(i) fuggveny a kifejezes- 
lista kdvetkezd elemenek kiiratAsi pozicidjAt jeldli ki. 
(Reszletesen Isd. a Fuggvenyeket ismertetd 2.3. Fejezetben.) 
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A PRINT kulcssz6 a BASIC program irasakor a ? karakterrel 
hetyettesithetfi. A program listazasakor a ? helyett mar a 
PRINT kulcssz6 fog megjelenni. 

PRINTKsorcia), <oszlopcin>,C<kifejezesek listaja)] 
PRINTS<sorci»),<oszlopci»), USING <karakteres kifejezes); 

(kifejezesek listaja) 

A megadott kifejezesek aktualis erteket - a kepernyo kiva- 
lasztott pontjat6l kezdodoen - kilistazza. 

A PRINT1 utasitas armyiban kulonbozik a PRINT utasitastcd, 
hogy segitsegevel a megadott kifejezesek a kepernyo tetsz6- 
leges pontjatol kezdodoen jelenithet6k meg. A S karakter 
utan AU6 - egymast6l vessz6vel elvalasztott - ket kifejezes 
aktualis erteke a kiiras kezddpontjanak sor- es oszlopcimet 
hatarozza meg. A sorcimnek a 0...15, mig az oszlopcimnek a 
0...41 intervallumba kell esnie. Amennyiben az ertekek a 
megadott interval lumon kivulre esnek, FC - Illegal Function 
Call, Illegalis funkci6hivas - hibajelzes keletkezik. Ha a 
megadott kifejezesek aktualis erteke tortszam, a PRIMO az 
ertek egesz reszevel szamol. 

A kepernyo legfelso sor a a O-as cimft, a legal so sor a 15-6s. 
Egy soron belal a balszelsd karakterpozici6 a O-as, a 
jobbszels* a 41-es. A PRINTS utasitas szempontjab6l egy 
sorban meg akkor is 42 karakterpozici6 van, ha a PRIMO eppen 
duplaszelessegft karakterek megjeleniteset vegzi. A kurzor 
pozicionalasa ebben az esetben is a normal meretft karakte- 
reknek megfeleloen tortenik. (Ha a kepernyd 15. soranak 41. 
poziciijaba irunk, a karakter megjelenitese utan megtortenik 
a keperny6tartalom eltolasa - scroll -. ) 

Ha fuggo leges irasra val6 atteres utan alkalmazzuk a PRINT! 
utasHaTt, a kurzor pozicionalasa az aj helyzetnek megfele- 
IGen mddosul. Ilyenkor a kepernyon 21 sor, soronkent 32 
karakter jelenitheto meg. Ennek megfelel6en a sorcim es 
oszlopcim erteke is 0...20, ill. 0...31 lehet. Fuggfileges 
irasnal a O-as cimft sor a keperny* bal szelen kezdodik, a 
20-as sor a jobbszelen, egy soron belal a O-as cimft karak- 
terpozici6 a kepernyo aljan, a 31-es a kepernyo tetejen 
talalhat6. 

PRINT USING (karakteres kifejezes>;< kifejezesek listaja) 

Az eloirt formatum szerint megjeleniti a megadott kifejeze- 
sek aktualis erteket. 

Az utasitisban a kifejezeslista ertelmezese azonos a PRINT 
utasitasnal leirtakkal, a karakter es kifejezes pedig a meg- 
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jelenites formAtumAt meghatArozu karaktereket tartalmazza. 

A PRINT USING utasitAs hasznAlatakor - ha karakter es erteket 
kivAnunk megjeleniteni - a kovetkezfi megjelenitest vezerlfi 
karaktereket alkalmazhat juk: 



Jelzi, hogy a kifejezesek listAjAban soronkovetkezc karakte- 
res kifejezes Altai szolgAltatott karaktersorozatnak csak az 
els6 karakteret kell megjeleniteni. 

Pelda: AS="Elso karakter" 
Ok 
PRINT USING "!";AS 

E 
Ok 

"Xn db bet&kdzX" 

Jelzi, hogy a ki f ejezesek listAjAban soronkovetkezo karakte- 
res kifejezes Altai szolgAltatott karaktersorozatnak csak az 
else n+2 db karakteret kell megjeleniteni. 

Ha a ket X jel kozott egyetlen betdkoz karakter sem All, a 
karaktersorozat els* ket karaktere fog megjelenni, ha egy 
betdkdz van, akkor hirom karakter fog megjelenni, stb... Ha 
a karaktersorozat hosszabb, mint a vezerl6mez6 Altai megha- 
tArozott hossz, a t£ilnyiil6 karakterek nem fognak megjelenni. 
Ha viszbnt a vezerlomezd hosszabb, mint a karaktersorozat, 
akkor az ut6bbi teljes hosszAban megjelenik es utAna meg 
annyi bet&koz, hogy osszesen a vezerlfimezo hossza Altai 
meghatArozott szimfc karakter jelenjek meg. 

Pelda: AS="darabolA5" 
Ok 

PRINT USING "X X";AS 
darab 
Ok 



A PRINT USING utasitAs hasznAlatakor - ha numerikus erteket 
kivArtunk megjeleniteni - a kovetkezo megjelenitest vezerlo 
karaktereket alkalmazhat juk: 



A kettfiskereszttel szAmjegypozicidt reprezentAlunk. A megje- 
I5lt 5zA»jegypozici6kat a PRIMO minden esetben ki jelzi. Ha a 



1-37 



PRIMO BASIC NVtLV LEffcAS 



kinyomtatand6 ertek kevesebb sz Am jegyet tartalmaz, mint 
amennyit a vezerlfimezoben megadtunk, a szAm elott annyi 
bet&koz karakter fog megjelenni, hogy a szam kitoltse a 
rendelkezesere AU6 teruletet. Amennyiben a megjelenitesre 
vAr6 szAmertek nem f#r el a vezerldmezo Altai kijelolt 
teruleten - tobb szAnjegyet tartalmaz -, megjelenik a teljes 
szam, de elotte - figyelmezteteskent - egy X karakter is. 

A # karakterek kozott bArhol all hat egy decimAlis pont. A 
pont a # jelek sOrozatAt ket reszre osztva meghatArozza, 
hogy a megjeleno szAmertek hAny t6rt jegyet, es hAny 
egeszresz jegyet tartalmazzon. Ha kijeloltunk egeszresz 
jegyeketf akkor a tizedespont el6tt egy "0" akkor is megje- 
lenik, ha a szAmertek egyebkent csak t&rt szAmjegyeket tar- 
talmaz. Ha a megjelenitendo szAmertek tobb tort jegyet tar- 
talmaz, mint amennyit a vezer lomezoben kijeloltunk, a PRIMO 
az aktuAlis szAmerteket a megadott szAmu tortjegyre kereki- 
ti. 

Pel da: PRINT USING "##.##* M ;76.49,5.4567B, . 17 
76.490 5.457 0.170 
Ok 

Ha a szAmertek megjeleniteset vezerlo mezoben az egeszresz, 
es a tortresz szAmjegyeinek szAma meghaladja a 24-et, a 
PRIMO FC - Illegal Function Call, IllegAlis funkciohivAs - 

hibajelzest generAl. 

ii ■ ii 

A pluszjel feltuntetese a vezer I6mez6 elejen, ill. vegen azt 
eredmenyezi, hogy a megjelenitendo szAmertek elojele - pozi- 
tiv elojel is - a szAm elejen, ill. vegen fog megjelenni. 

Pelda: PRINT USING "+#*#.*"; 12.45,-12.45 
+12.5 -12.5 
Ok 
PRINT USING "#*#.*#+"; 12.45,-12.45 

12.45+ 12.45- 
0k 



A kdtojel feltuntetese a vezer I6mez6 vegen azt eredmenyezi, 
hogy a negativ szAmertekek megjelenitesekor a PRIMO az el6- 
jelet a szAm vegere - jobb szelere - irja. 

Pelda: PRINT USING "###.##-"; 12.45,-12.45 
12.45 12.45- 
Ok 
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A vezerl6mez6 elejen feltuntetett »« azt eredmenyezi, hogy a 
megjelenitendo szam elejen es vegen esetlegesen el6fordul6 
bet&koz karakterek helyett a PRIMO * karaktereket fog kiir- 
ni. A ** tovabba ket megjelenitendo szamjegyet is jelkepez. 

Pelda: PRINT USING "**#.##-"; 12.45,-12.45 
*12.45*»12.45- 
Ok 

"If" 

Egy szamspecif ikaci6s vezerlomezo elejen feltuntetett SS azt 
eredmenyezi, hogy a megjelenu szam el6tt egy S is kiirodik. 
A SS tovabba ket megjelenitendo szamjegyet is jelkepez. 
Exponential is kijelzes eseten nem alkalmazhato. 

Pelda: PRINT USING "SS**. **";7.5, -12.38 
S7.50-S12.38 
Ok 

A **S egy vezerl6mez6 elejen az el6zoekben ismertetett ket 
szimb6lum - »», SS - hatasat egyesiti. A szam el6tti 
bet&kozok helyen « karakterek es egy $ jelenik meg. A *»S 
tovabba harom megjelenitendfi szamjegyet is jelkepez. 

Pelda: PRINT USING "»*S#. **";54. 128 
*S54. 13 
Ok 



A szamjegyspecif ikacid egeszresz mezejenek belsejeben elhe- 
lyezett egy - vagy tobb - vesszo azt eredmenyezi , hogy a 
szamertek megjelenitesekor a PRIMO minden, a tizedesponttil 
balra haladva elhelyezkedo harmadik szamjegy ele egy vesszot 
fog kiirni. A vessz6 tovabba egy megjelenitendo szamjegypo- 
zicidt is jelkepez. 

Pelda: PRINT USING "##,#*###.#*"; 1.2345&78D+5 
123,456.78 



"tttt" 

Egy szamjegyspecifikacios mez6 vegen feltuntetett tttt jel- 
sorozat exponencialis kijelzest eredmenyez. A megjelenitesre 
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vard szamertek mantisszaja a tttt elott 4.116 vezer I6mez6nek 
megfelelo formatumban fog megjelenni , a kitevo pedig E+xx, 
vagy D+xx alakban. Szukseg eseten - a vezerl6mez6ben kije- 
lolt tizedespontnak megfelelfien - valtozik a kitevo erteke. 
Ha az elojetet a megismert vezerlokarakterek segitsegevel 
nem a kiirasra keruilo szam vegen jelenittet juk meg, az 
egeszresz szamara megadott szamjegypozici6k kozu.1 a PRIMO 
egyet az elijel reszere hasznal fel. 

Pel da: PRINT USING "##. ##tttt";576. 13 
5.76E+Q2 
Ok 

PRINT USING "#.##tttt-";-75.55 
7.56E+01- 
Ok 

PRINT USING "#.##tttt"j534. 1,-643. 12 
0.53E+03-.64E+03 
Ok 

Ha a kiiratando szamjegy nem fer el a vezer I6mez6 Altai 
kijelolt teruleten, egy I jet jelenik meg a szAm elott. 
Hasonl6an, ha a rendelkezesre AU6 terulet kerekites miatt 
lesz szftk, a kerekitett szAmertek el&tt megjelenik a X jel. 

Pelds: PRINT USING "**.*#"; 574. 18 
X574.18 
Ok 

PRINT USING "#.##"j9.997 
XlO.OO 
Ok 



Ha a PRINT USING utasitAs megjelenitest vezerlo karakteres 
kifejezeseben az eddig felsorolt karakterektol eltero jelet 
alkalmazunk, vagy a vezer lokaraktereket nem az isrnertetett 
formAban hasznAljuk, akkor a PRIMO ezeket a jeleket karakte- 
res konstansoknak tekinti es a szAmertekek, ill. karakter- 
sorozatok megjelenitesekor a vezer 16 kifejezes tartalmAnak 
megfelelien jeleniti meg. 

Pelda: AS="£v: #*##* Ho: % X. =## nap" 
Ok 

PRINT USING A£;1984,"mArcius",31 
±v: 1984 H6: mar. =31 nap 
Ok 

A PRIMO a megjelenitest vezerlo karakteres kifejezes egyes 
vezerlo mezoit rendre a ki fejezeslistaban soronkovetkezi 
kifejezesek aktuAlis ertekenek megjelenitesehez hasznal ja 
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fel. Ha a soronkovetkezd vezerldmezo karakteres ertek megje- 
lenitesere szolgalr a kifejezeslista kovetkezo elemenek 
karakteres erteket kell szolgaltatnia* ha viszont a vezerld- 
mezo numerikuSf a soronkovetkezd kifejezesnek is szamerteket 
kell adnia. Ha ez nem kdvetkezik be» a PRIMO TM - Type 
Hisaatchf Tipuskeveredes - hibajelzest ad. 

Ha a vezerl6 karakteres kifejezes kevesebb mezot tartalnaz f 
mint a kifejezeslista elemeinek szama* akkor a vezerld ka- 
raktersorozat "kimerulese" utan a PRIMO a kovetkezo kifeje- 
zes megjelenitesehez a vezerl6 karaktersorozatot ismet az 
elejerfil kezdi ertelmezni. Igy a PRINT USING utasitas segit- 
segevel tobbr azonos formaban megjelenitendd szamhoz csak 
egyetlen vezerld mezot kell megadni. Ha a vezerld karakteres 
kifejezes tobb mezdt tartalmaz» mint a kifejezeslista eleme- 
inek szama* a PRIMO a felesleges mezoket figyelmen kiviil 
hagyja. 

Ellentetben a PRINT utasitissal, a PRINT USING utasitasban a 
kifejezeslista elemeit elvalasztd vesszd, vagy pontosvesszd 
karakter nem eredmenyez a megjelenites soran kulonbseget. A 
kifejezeslista vegen alkalroazott vesszd* vagy pontosvesszd 
hatasa azonban azonos azzal, amit a PRINT utasitasnal leir- 
tunk. 

PRINT* <kifejezesek listaja) 

PRINT* USING < karakteres kifejezes); <ki fejezesek listija) 

A megadott kifejezesek aktualis erteket egy korabban CREATE 
utasit&ssal megnyitott adatallomanyba listazza. 

Az utasitisok - azzal a kulonbseggelr hogy az adatok nem a 
kepernydre f hanem az adatallomanyba kerulnek - azonosak a 
PRINT es PRINT USING utasitasokkal. Ez utdbbiak reszletes 
leirasa a fejezet eldzd reszeben talilhat6. 

Ha a programban meg nem nyitottuk meg az adatal lomanyt, a 
PRIMO FD - File Description, Allomanyleiras - hibajelzest 
general. 

RANDOM 

Ve let I en kezddertekrdl djrainditja a veletlenszamgeneratort. 

A PRIMO a veletlenszamgeneratornak egy veletlen kezdderteket 
adi igy a RANDOM utasitast kovetden general t veletlenszaraok 
egy Cij veletlenszam-sorozat elemei lesznek. A RANDOM utasi- 
tas alkalmazasaval elerhetd, hogy a PRIMO az egymast kovetd 
bekapcsolasok utin mindig mas es mis veletlenszam-sorozatot 
general jon. 



1-41 



PRIHO BASIC IMYELV LEIRAS 



READ <v4ltoz6>C,<v4ltoz6>3... 

- Beolvas egy adatot a DATA-listAbol, es azt aktualis 
ertekkent a soronkovetkezfi v4ltoz6hoz rendeli. 

A READ utasitis csak akkor alkalnazhat6, ha a BASIC program- 
ban DATA utasitasokat is szerepeltetunk. A READ utasitis 
megkeresi a DATA-lista kovetkezo elemet, es ezt az erteket a 
READ utasitist koveto v4ltoz6k kozul a soronkovetkezohoz 
rendeli. A READ utasitast numerikus es/vagy karakteres 
valtozok - beleertve az indexelt v4ltoz6kat is - kovethetik. 
Ha a READ utasitasban a soronkovetkezfi valtozo numerikus, 
akkor a DATA-lista aktualis elemenek is numer i kusnak kell 
lennie. Abban az esetben, ha ez nem kovetkezik be, SN - 
Syntax Error, Formai hiba - hibajelzes keletkezik. Ha a READ 
utasitasban van meg erteket nem kapott v4ltoz6, de a DATA- 
listab6l tobb adat mar nem olvashat6 ki, OD - Out of Data, 
Ki meruit a DATA-lista - hibajelzes keletkezik. 

Ha ajra akarjuk olvasni a DATA-lista tartalmit, a RESTORE 
utasitast kell alkalmazni. A RESTORE reszletes leirasa a 
fejezet kesobbi reszeben talalhato. 

REM [<megjegyzes>] 

A BASIC program megerteset elosegitfi megjegyzest helyez a 
programba. 

A REM utasitist a PRIMO a BASIC program vegrehajtasa sor4n 
figyelmen kivul hagyja, de a program listazasakor valtozat- 
lan formaban megjeleniti. Egy GOTO, vagy BOSUB utasitasban 
ugrasi cimkent megadhatjuk a REM utasitas sorszamit is. 
Ebben az esetben a BASIC program vegrehajtasa a REM utasi 
tast koveto programsor elsfi utasit4s4tol folytat6dik. 

A REM kulcssz6 a BASIC program irasakor a ' karakterrel 
helyettesitheto. Az ' alkalmazasa eseten a megjegyzest a 
sorban eldrebb 4116 BASIC utasitist6l nem kell kettospont 
karakterrel elv4lasztani. Ellentetben a PRINT kulcsszot 
helyettesito ? karakterrel, az aposztrof a program Ust4z4- 
sakor sem alakul 4t REM kulcsszov4. 

Megjegyzes vegenek a PRIMO csak a BASIC sor veget tekinti. A 
REM utasi t4s tehAt csak egy BASIC programsor utolso utasit4- 
sa lehet. Ha a REM kulcsszot az ' karakterrel helyettesit- 
juk, Qgyeljunk afra, hogy" ezt_DATA utasit4s sor4ban ne 
tegyuk, mert megjegyzesunket a PRIMO a DATA-lista elemenek 
<0 *fogja^tekinteni. 
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RESET (<x-koordinAta>,<y-koordinAta>) 

- Kikapcsolja a kepernyon a megadott koordinAtAja pontot. 

A PRIMO kepernyoje 256x192 pontbol ill. Ezek bArmelyike a 
RESET utasitAs segitsegevel kikapcsolhato. 

Az x-koordinata 0...255, az y-koordinata 0...191 erteket 
vehet fel. A kepernyd bal als6 sarkAban talalhato a 0,0 
koordinAtAja pont, a Jobb felso sarokban a 255,191 koordinA- 
tAja. 

Ha a kepernyd aktuAlis alapszine fekete, a RESET utasitas 
hatasara a megcimzett pont is fekete lesz, mig ha a kepernyo 
alapszine feher, a cimzett pont is feher lesz. 

Ha a koordinAtakent megadott kifejezesek valamelyike az 
emlitett interval I uroon tali erteket kepvisel, FC - Illegal 
Function Call, 1 1 legal is funkciohivas - hibajelzes keletke- 
zik. Ha valamelyik kifejezes aktualis erteke tortszAm, a 
PRIHO az ertek egesz reszevel szAmol. 

RESTORE [<sorszi*>] 

Lehetdve teszi, hogy a DATA-listAt - vagy annak kijelolt 
reszet - ajraolvassuk. 

A RESTORE utasitAs vegrehajtAsa utAn a kovetkezo READ utasi- 
tAs a DATA-listAt az elso elemtol kezdve olvassa ki. Ha 
megadjuk az opcionAlis sorszAmot, a kovetkezd READ utasitAs 
a megadott sorszAma sorban - vagy az azt koveto sorok vala- 
rnelyikeben - AU6 DATA utasitAstol kezdve olvassa a DATA- 
listAt. Ha olyan sorszAmot adunk meg, amely nem szerepel a 
BASIC programban, UL - Undefined Line, NemdefiniAlt sor - 
hibajelzes keletkezik. 

RESUME 
RESUME 
RESUME NEXT 
RESUME <sorszAm> 

A programozott hibakezeles befelyezeset jelzi. 

A felsorolt negy forma kozul bArmelyik alkalrnazhato, de a 
kulonfele RESUME utasitAsok hat Asa mAs es mAs. 

A RESUME vagy RESUME utasitAs hat As Ar a a programozott 
hibakezeles vegeztevel a BASIC program vegrehajtAsa a hi bit 
okozo utasitAstol folytatddik. 
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A RESUME NEXT utasitAs vegrehajtAsa utan a BASIC program a 

hibAt okoz6 utasitAst kovet6 utasitAstol folytatodik. 

Ha a RESUME utasitis utan egy sorszAmot adunk meg, a progra- 
mozott hibakezeles vegeztevel a BASIC program vegrehajtAsa a 
megadott sorszAmu 5ort6l folytatodik. Ha a programban nines 
ilyen sorszAmi sor, UL - Undefined Line, NemdefiniAlt sor - 
hibajelzes keletkezik. 

Ha a PRIMO a hibakezelo rutinon kivul egy RESUME utasitAst 
eszlel, RW - Resume Without Error, Hiba nelkuli RESUME - 
hibajelzest generAl. 

A programozott hibakezelest az ON ERROR SOTO utasitAssat 
lehet aktivizAlni. Ennek reszletes leirAsa e fejezet elozo 
reszeben talAlhat6. 

SAVE <programnev> AllQ 

Magn6ra kimenti a PRIMO mem6riAjAban levo BASIC prograraot. 

Az utasitAs hatAsAra a PRIMO a magn6ra felirja a megadott 
programnevet, majd 256 byte-os reszekre - blokkokra - osztva 
a szalagon rogziti a metndriAban pillanatnyilag tArolt BASIC 
programot. 

A programnev megadAsa kotelezo. A nevet karakteres konstans- 
sal, karakteres vAltozdval, vagy karakteres erteket szolgAl- 
tat6 kifejezessel adhatjuk meg. A programnev maximAlisan 16 
karakter hosszi Lehet, a ki-s-, ill. nagybetuket a PRIMO 
kalonbozonek tekinti. Ha 16 karakternel hosszabb programne- 
vet adunk meg FC - Illegal Function Call, IllegAlis funkci6- 
hivAs - hibajelzes keletkezik. 

SAVE SCREEN <AllomAnynev> 

A kepernyo pillanatnyi tartalraAt magnora menti. 

A SAVE SCREEN utasitAs hatAsAra a PRIMO a magn6ra felirja a 
megadott AllomAnynevet, majd 256 byte-os reszekre - blokkok- 
ra - osztva a szalagon rogziti a kepernyo pillanatnyi tar- 
talmAt tArol6 - 6 Kbyte meretd - memoria bitmintAzatAt. (Az 
elmentett kepernyotartalom kesobb egy LOAD utasitAssat visz- 
szatolthet*. A LOAD utasitAs a beolvasott ALlomAny tipusAbil 
Allapitja meg, hogy a szalagrol erkezo adatokat a kepernyo- 
mem6riAba kell toltenie.) 

A programnev megadAsa kotelezo. A nev megadAsAnak szabAlyai 
azonosak a SAVE utasitAsnAl leirtakkal. 
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SET (<x-koordinata>,<y-koordinata>) 

Bekapcsolja a kepernydn a megadott koordinataja pontot. 

Ha a kepernyo aktualis alapszine fekete, a SET utasitas 
hatasara a megcimzett pout feher lesz, mig ha a kepernyo 
alapszine feher, a cimzett pont fekete lesz. 

Az x-koordinata a 0...255, az y-koordinata a 0. ..191 erteket 
veheti fel. A kepernyo bal alsd sarkaban talalhat6 a 0,0 
koordinataja ponti a jobb felsfi sarokban a 255,191 koordina- 
taja. Ha a megadott ertekek valamelyike az emlitett inter- 
vallumon tali erteket kepyisel, FC - Illegal Function Call, 
Illegalis funkciohivas - hibajelzes keletkezik. Ha valame- 
lyik kifejezes aktualis erteke tortszara, a PRIMO az ertek 
egesz reszevel szamol. 

STOP 

Megallitja a BASIC program futasat, es a PRIMO visszater 
parancs modba. 

A STOP utasitas a BASIC program tetszoleges pontjan szere- 
peltetheto. Ha a program logikaja megkivanja, a programban 
tobb STOP utasitas is elhelyezheto. Amikor a PRIHO vegrehajt 
egy STOP utasitast, a kepernydn a kovetkezo iizenet jelenik 
meg: 

Break in nnnnn 

ahol nnnnn annak a BASIC programsornak a sorszima, amelyben 
a megallast kivalt6 STOP utasitis szerepelt. 

A STOP utasitissal megallitott BASIC program a CONT parancs 
begepelesevel tovabbindithat6. 

TEST Kprogramnev)] 

Ellenorzi a magn6n rogzitett program formatumat. 

A TEST utasitas hatasara a PRIMO a uagn6n megkeresi a mega- 
dott neva programot, majd ellenorzi annak formatumat. Ha a 
rogzites hibatlan, a kepernyon megjeleno - a LOAD utasi- 
tasnal ismertetettel azonos - uzenetben lathato hibaszamlal6 
erteke 0. 

Mivel az ellenorzes nem a magndn orzott informacio es a 
PRIMO mem6riijaban tarolt program osszehasonlitasan - hanem 
a szalagformatum ellenorzesen - alapul, ezert nem feltetle- 
nul sziikseges, hogy az etlenorzendo program a memoriaban 
I egyen . 
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Ha a TEST kulcsszo utan megadjuk az ellendrizendo program 
nevet, a PRIMO azt a programot ellendrzi, amelynek neve a 
magnon soronkovetkezo programok kozul elsdnek bizonyul azo- 
nosnak a megadott newel. A ket nev akkor azonos, ha: 

- egyenld hosszdak £s a karakterek rendre azonosak 

- a megadott n£v rovidebb, mint a magn6n soronkovetkezo 
program neve, de a hosszabb nev els6 r£szenek karakterei 
rendre azonosak a rovidebb n6v karakterei vel . 

Ha a TEST utasitasban nem adunk meg programnevetf a PRIHO a 
magn6n soronkovetkezo program formatumat ellenftrzi. Ha meg- 
adjuk a program nevet, akko« azt a LOAD utasitasban Leirtak 
szerint tenet juk meg. 

2.3. FGggvenyek 

Fuggvenyeknek nevezzuk a PRIHO BASIC azon kulcsszavait, 
melyek ki fejez£sekben valtozok, vagy konstansok hely£n alkalmaz- 
hatdk, £s megadott argumentumukon egy elore definialt funkcidt 
vegrehajtva, eredm^nyiil egy szamerteket, vagy karaktersorozatot 
szolgaltatnak. A beepitett fuggv£nyek tobbsege a maszaki-matema- 
tikai gyakorlatban megszokott egyert£ka numerikus fuggv£ny, de a 
PRIHO szamos, karakteres ertekeken manipulate fuggvennyel is 
rendelkezik. Ezen talmenoen nehany speciilis fuggveny is alkal- 
mazhato. 

A leirasban a fuggv£nyek argument uraat az i, j, x es xi 
szimbolumokkal jeloljuk. Az egyes szimb6lumoknak a kovetkezo 
jelent^st tulajdonitjuk: 

i es j numerikus egesz erteket szolgaltato kifejezest jelol. 
Ha a kifejezes aktualis erteke nem esik a -3276S... 32767 
interval I umba, OV - Overflow, Talcsordulas - hibajelzes 
keletkezik. Ha a megadott kifejezes aktualis erteke 
tortszarn, a PRIHO az *rtek egesz resz£vel szamol. 

(Nehany fuggveny eset£n a kifejezes ert£kenek m£g az elobb 
emlitett inrtervallumnal is szakebb tartomanyba kell esnie. 
E tartomanyok tall*pese eseten a PRIHO FC - Illegal Function 
Call, II legal is funkciohivas - hibajelzest general. A 
szakebb interval lumok m£retet az egyes fuggvenyeknel adjuk 
meg. ) 

Az x egesz-, egyszerespontos- vagy duplapontos szamerteket 
szolgaltato kifejezest jelol. 

Az xl karakteres Erteket add kifejezest jelk&pez. A karakte- 
res kifejez£sek alkalmazasanal ugyeljunk arra, hogy a letre- 
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hozand6 karaktersorozat nem lehet hosszabb 255 karakternel, 
ellenkezo esetben a PRIMO LS - Long String, Hosszu karakter- 
sorozat - hi bat jelez. A karakterkonstansokat, ill. karakte- 
res vAltoz6kat tartalmazo, a PRIMO szAmAra tulsAgosan bonyo- 
lult kifejezesek elofordulAsa eseten ST - String Formula Too 
Complex, TulsAgosan bonyolult karakteres kifejezes - hiba- 
jelzes keletkezik. Ilyenkor a kifejezest ket, vagy tobb 
reszre osztva kell a BASIC programban leirni. 

Azt, hogy egy fuggveny eredraenyul numerikus, vagy karakteres 
erteket szolgAltat-e, a fuggveny nevenek formAtumAbol is eldont- 
hetjuk. Mindazon fuggveny neve f amely eredmenyul karaktersoroza- 
tot ad, a S karakterrel zAr6dik, roig a numerikus erteket ado 
fuggvenynevek vegen nines tipusazonosit6 karakter. 



ABS(x) 



Az x kifejezes aktuAlis ertekenek abszolaterteket eredmenye- 
zi . 



ASC(xl) 

Az xl karaktersorozat elso karakterenek ASCII kddjAt adja 
eredmenyul. Ha az xl ures string - a hossza nulla - FC - 
Illegal Function Call, Illegalis funkci6hivAs - hibajelzes 
keletkezik. 

ATN(x) 

Eredmenyul x arkusz tangenset adja radiAnban. Az eredraeny a 
-pi/2. ..pi/2 tartoraAnyba esik. Az x kifejezes tetsz6leges 
numerikus tipusii lehet, de az ATN fuggveny mindig - meg 
duplapontos argument urn eseten is - egyszerespontos erteket 
szolgaltat. Ennek az az oka, hogy a PRIMO a logaritmikus, 
exponencialis, trigonometrikus es inverz trigonometrikus 
fuggvenyeket - az egyszerubb es gyorsabb sz Am it as erdekeben 
- csak 7 decimal is jegy pontossAgra szamitja ki, es igy a 
duplapontos valos szAm tovAbbi 9 decimAlis jegye mAr nem 
kepvi seine val6di erteket. 

CALL(iC,J]) 

FelhasznAl6i gepi kodu rutint indit. Az els6 operandus a 
gepi kodu programresz mem6riacime, a mAsodik operandus 
erteke - ha megadjuk - a gepi k6du rutinba erkezeskor a Z80 
mikroprocesszor DE regiszterpAr jAban talAlhato. 

A gepi k6du rutint a FelhasznAl6nak kell a memoriAban elhe- 
lyeznie, es gondoskodnia arr6l, hogy a rutint a BASIC Inter- 
preter mukodese sorAn ne irja felul. A CALL fuggvenyben a 
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gepi kodil rutin mem6riacimet a POKE utasitasnal leirt modon 
kel I megadni. 

A gepi kodil rutinban a Z80 mikroprocesszor belsd regiszterei 

\X \<. W)i-? ~ - az IX is I regiszterek kivetelevel - szabadon hasznalha- 

. x . , tok, mentesukrol a gepi rutin meghivasa elott a PRIMO gon- 

W> I ir, -l 7 doskodik. Az IX es I regiszterek erteke azonban meg idosza- 

va WAaa kosan sem m6do5ithat6, mert ez a PRIHO helytelen makodesehez 

^ W^6o7- vezetne. 

a v X\).^s\\-}r Mivel a cmjl fuggveny, m&kodesenek befejezesekent eredmenyul 
1 egy szamerteket szolgaltat. A CALL mindig egy egesz szamot 

" : {■ )!' ad eredmenyul, amely a Z80 mikroprocesszor HL regiszterpar- 
janak a gepi rutinbdl valo visszaterest kozvetlenul megelozd 
erteke lesz. A leirtakbol kitanik, hogy a gepi k6da rutinnak 
egy parametert adhatunk at, es eredmenyul is egy parametert 
kaphatunk vissza. (Termeszetesen az atadott parameter jelol- 
heti egy parameter list a elejet is, igy a gepi rutin mar tobb 
parametert is atvehet a BASIC programtil. Teljesen hasonlo 
modon egynel tobb parameterertek vissza is adhato a BASIC 
programnak. ) 

A gepi koda rutinb6l a BASIC programba a vezerlest a Z80 
mikroprocesszor RET utasitasaval adhatjuk vissza. Ogyeljunk 
arra, hogy a gepi szintft rutin a STACK-be ne helyezzen el 
tobb adatot, mint amennyit onnan kiolvas, vagy ne olvasson 
ki a behelyezett adatoknal tobbet, mert ez a PRIMO helyte- 
len makodesehez vezethet. (A gepi szinta rutin szamara a 
PR IMO 40 byte mereta STACK teruletet biztosit. Ennel tobb 
~adat STACK-be helyezese a szamitogep helytelen makodeset 
eredmenyezheti . ) 

CDBL(x) 

- Az x kifejezes aktualis erteket duplapontos szamertekke 
alakitja, es eredmenyul ezt a duplapontos erteket szolgal- 
tatja. 

CHRS(i) 

Eredmenyul 1 karakter hosszasaga karaktersorozatot ad, 
amely az i kifejezes aktuilis ertekenek megfeleld koda ka- 
rakterbol all. Az i kifejezes aktuilis ertekenek a 0...255 
tartomanyba kell esnie. A CHRI fuggvenyt altalaban arra 
hasznaljuk, hogy segitsegevel a kepernyore, nyomtatora, stb. 
egy speciilis karaktert kuldjunk. 
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CINT(x) 

- A megadott x kifejezes aktualis erteket egesz szammA alakit- 
ja f es eredmenyul ezt az egesz erteket adja. Ha az x kifeje- 
zes aktualis erteke nem esik a -32768. .. 32767 interval I umba, 
a PRIHO OV - Overflow, Talcsordulas - hibat jelez. 

COS(x) 

Az x kifejezes radianban ertelmezett ertekenek koszinuszat 
szolgaltatja. Az eredmeny minden esetben egyszerespontos 
valds szam lesz. 

CSN6(x) 

A megadott x kifejezes aktualis erteket egyszerespontos 
valos szamna alakitja, es eredmenyul ezt a szaraerteket szol- 
galtatja. 

ERL/ERR 

Valahanyszor a PRIHO BASIC Interpretere a BASIC program, 
vagy parancs vegrehajtasa soran egy hibat eszlel, beallitja 
az ERL es ERR valtozok erteket. Az ERL valtozd erteke a 
hibas utasitast tartalmazd BASIC programsor sorszama, az ERR 
valtozo erteke a hibira jellemzo hibak6d lesz. (Az egyes hi- 
bakhoz rendelt hibakodok a Fuggelekben talalhatok. ) 

Az ERL es ERR valtozdkat altalaban programozott hibakezelest 
vegzo rutinban alkalnazzuk. Segitsegukkel megallapithatd, 
hogy a BASIC program melyik reszen, mi I yen hiba fordult el6. 

Ha a hibat okozo utasitast parancs modban adtuk meg, az ERL 
valtozd erteke 65535 lesz. Igy a programozott hibakezelest 
vegzd rutint agy is kialakithatjuk, hogy parancs mddban fel- 
ismert hibak eseten azok elharitasanak megkiserlese helyett, 
jelenitse meg a hibajelzest. Egy ilyen hibakezelo rutin elso 
utasitasa pi. a kovetkezo alaku lehet: 

105 IF ERL=65535 THEN ON ERROR GOTO 

(Ha a hibarutinban kikapcsoljuk a hibakezelest, megjelenik a 
hibarutinba ugrast kivaltd hi bar a utal6 jelzes. Igy a fenti 
utasitas a kit&zott celt megvalosit ja. Ne felejtsuk azonban 
el, hogy ezutan a programozott hibakezeles csak akkor vilik 
ismet aktivvi, ha azt az ON ERROR GOTO sorszam utasitassal 
ismet bekapcsoljuk. ) 

Mivel az ERL es ERR valtozok BASIC kulcsszavak, ezert prog- 
ramozottan nem kaphatnak erteket. Ha megis megkiserlunk e 
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valtozoknak erteket adni, SN - Syntax Error , Foraai hiba - 
hibajelzes keletkezik. 



EXP(x) 



Eredmenyul az e x erteket adja. Az x kifejezes aktuilis 
erteke nem haladhatja meg a 87.33655 erteket, ellenkezo 
esetben OV - Overflow, Talcsordulas - hiba lep fel. Az EXP 
fuggveny iltal szolgiltatott eredmeny minden esetben egysze- 
respontos val6s szim lesz. 



FIX(x) 



Az x kifejezes aktuilis ertekenek egeszreszet adja eredme- 
nyul. A fuggvenyertek kiszimitisa a kovetkezo keplet alapjin 
tortenik: 

FIX(x)=SGN<x)*INT(ABS(*)> 

A FIX es INT fuggvenyek kozti kulonbseg abban all, hogy a 
FIX negativ argumentum eseten nem a szomszedos kisebb, hanen 
a nagyobb erteket szolgiltatja. 

Peldik: PRINT FIX(7.46) PRINT FIX(-7.46) 

7 -7 



FRE(O) 
FREC") 



A fuggveny eredmenyul a BASIC iltal meg fel nem hasznilt 
mentor i a byte-ban adott meretet szolgaltatja. 

A FRE argumentumit csak formai okokbol kell megadni, annak 
erteke kozombos, csak tipusa lenyeges. 

Ha a FRE argumentuma numerikus f a fuggveny megadja, hogy a 
mem6riiban meg hiny byte hasznilhatd fel a BASIC program es 
viltozGi tirolasira. Ha az argumentum karakteres tipusa, a 
karakterulet meg fel nem hasznalt reszenek byte-ban mert 
meretet kapjuk meg. 



INKEYf 



Megvizsgilja, hogy a billentyazet melyik gombjit nyomjik. Ha 
egyetlen billentyut sem erintunk, az INKEYS eredmenyul 
hosszusigu karaktersorozatot - ures stringet - ad. Ha nyom- 
juk a klaviatura valamelyik gombjit, a keletkezd - egy ka- 
rakter hosszu - karaktersorozat a megerintett gomb ASCII 
k6djAt tartalmazza. 

Az INKEYS a billentyazeten megnyomott gomb kepet nem irja ki 



1-50 



PRIHO BASIC NYELV LEIRAS 



a kepernyfire. Igy e fuggvenyt tobbnyire akkor alkalmazzuk, 
ha a BASIC program Altai feltett kerdesre vArjuk az egyetlen 
karakterbdl AU6 vAlaszt, vagy arra vArunk, hogy a Felhasz- 
nAld valamely billentya megnyomAsAval jelezze, hogy a BASIC 
program vegrehajtAsa folytatddhat. 



INP(i) 



Az INP fuggveny segitsegevel a Z80 mikroprocesszor - az i 
kifejez*s aktuAlis erteke Altai - megcimzett input portjAril 
olvashatunk be egy 8 bites adatot. A port-cimnek a 0. ..255 
tartomAnyba kel I esnie. 



INT(x) 



Eredmenyul az x kifejezes aktuAlis ertekehez legkdzelebb 
esdf annAl kisebb, vagy azzal egyenlft egesz szAmot adja. 

PeldAk: PRINT INK7.46) PRINT INTC-7.46) 
7 -a 



l_EFTI(xl,i> 



Az xf karakteres kifejezes Altai adott karaktersorozat bal- 
oldalan elhelyezkedfii i karakter hosszusAgu stringet adja 
eredmenyul. i ertekenek a 0. ..255 tartomAnyba kell esnie. 
Ha i aktuAlis erteke nagyobb f mint xl hossza f az eredmeny a 
teljes xl karaktersorozat lesz. Ha i=0, ures string lesz az 
eredmeny. 



LEN(xS) 



Az xl karaktersorozatot alkot6 karakter ek szAmAt - a string 
hosszAt - adja. A hosszba a kepernyon meg nem jelen6 f speci- 
Alis karakterek is beleszAmitanak. Az ures string hossza 0. 



LOG(x) 



x kifejezes aktuAlis ertekenek termeszetes alapu logaritmu- 
sAt - In x - adja eredmenyul. x ertekenek 0-nAl nagyobbnak 
kell lennie. Az eredmeny minden esetben egyszerespontos 
valos sz Am lesz. 



MIDKxf, H,j1) 



Az xS karaktersorozat i. karakter etdl kezdfidfi, j karakter 
hosszusAgu stringet eredmenyezi. Az i kifejezes aktuAlis 
ertekenek az 1...255 interval I umba, j ertekenek - ha megad- 
juk - a 0. ..255 tartomAnyba kell esnie. Ha a j kifejezest 
nem adjuk meg f vagy j ertekenel kevesebb karakter van az xl 
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string i. karakteretol jobbra, az eredraenystring az i. ka- 
raktertdl kezdodd, valamennyi jobbra eso karaktert tar tat - 
mazni fogja. Ha i erteke nagycbb, mint xl hossza, eredmenyiil 
ires stringet kapunk. 



PEEK(i) 



PI 



Eredmenyiil az i kifejezes aktuAlis erteke Altal megcimzett 
memoriabyte erteket adja. Az eredmeny egy, a 0...255 tarto- 
mAnyba eso egesz szAm lesz. A PEEK fuggveny argumentumakent 
megadott erteket a POKE utasitAsnAl leirtak szerint kell 
megadni. A PEEK fuggveny a POKE utasitas ellentetjenek fetel 
meg. 



A PI a Ludolf-fele szAmot - 3.14199 - jelkepezi. Mivel a PI 
BASIC kulcssz6, ezert programozottan nem kaphat erteket. Ha 
megis megkiserel juk az ertekadAst, SN - Syntax Error, Formai 
hiba - hibajelzes keletkezik. 



POIMT(i,j) 



E fuggveny segitsegevel a PRIMO kepernyoje egy pontjanak 
Allapotat ellenfirizhetjuk. Az i kifejezes a pont x-koordinA- 
tAjAt adja, ertekenek a 0...255 interval tumba kell esnie. A 
j a pont y-koordinAtajAt hatarozza meg, ennek erteke a 
0...191 tartomanyban lehet. 

A POINT fuggveny eredmenyiil a 0, vagy a -1 egesz szamot 
adja. Ha a megcimzett pont viligit - fekete alapon feher, 
vagy feher alapon fekete - az eredmeny -1 lesz. Ha a 
vizsgalt pont szine megegyezik a kepernyo aktualis alapszi- 
nevelf az eredmeny lesz. 



POS(O) 



A kepernyon elhelyezkedo kurzor aktuAlis oszlopcimet adja 
meg. A bal szelso oszlop cime 0. Mivel a PRIMO egy kepernyo- 
sorban 42 karaktert kepes megjeleniteni, ezert a POS fugg- 
veny Altal szolgAltatott egesz szAm a 0...41 tartomanyba 
esik. A fuggveny argumentumAt csak formai okokbol kell meg- 
adni f erteke kozombos. 



RIBHTI(xf,i) 



Az xt karakteres kifejezes Altal adott karaktersorozat jobb- 
oldalAn elhelyezkedo, i karakter hosszusAgu stringet adja 
eredmenyiil. i ertekenek a 0...255 tartomAnyba kell esnie. Ha 
i aktuAlis erteke nagyobb, vagy egyenld xS hosszAval, az 
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eredmeny a teljes xS karaktersorozat lesz. Ha i=0» ures 
string lesz az eredmeny. 



RNO(x) 



Az alveletlenszam sorozat kovetkezo elemet general ja. A 
PRIMO az x kifejezes egesz erteket veszi figyelembe. 

Ha az x kifejezes aktualis erteke negativ, FC - Illegal 
Function Call, Illegalis funkciohivas - hiba keletkezik. 

Ha az x kifejezes aktualis erteke 0<x<l, egy 0<RND(x)<l 
interval I umba eso veletlenszam keletkezik. 

Ha az x kifejezes aktualis erteke nagyobb, vagy egyenld 2- 
vel» a PRIMO a general t veletlen szamot megszorozza az x 
kifejezes aktualis ertekevel» es az igy kapott szam egesz 
reszenel eggyel nagyobb szamot adja eredmenyul » vagyis egy 
0<RND(xMx interval I umba es6 veletlen egesz szamot general. 

Ha az x kifejezes aktualis erteke l<x<2» veletlen szamkent a 
PRIMO konstans 1 erteket szolgiltat. 



SGN(x) 



Az x kifejezes aktualis erteke eldjelenek fuggvenyeben -l f 
0, +1 erteket ad eredmenyul. Az eredmeny a kovetkezdkeppen 
alakul: 

Ha x<0, SGN(x)=-l 
Ha x=0, SGN(x)= 



Ha x>0, SGN(x)=+l 



SIN(x) 



- Az x kifejezes radianban ertelmezett ertekenek szinuszat 
szolgaltatja. Az eredmeny minden esetben egyszerespontos 
valos szam lesz. 



SQR(x) 



Az x kifejezes aktualis ertekenek negyzetgyoket adja. Az 
eredmeny minden esetben egyszerespontos valos szamertek 
lesz. x aktualis ertekenek pozitivnak kell lennie. 



STRS(x) 



Eredmenyul egy karaktersorozatot ad f amely x kifejezes aktu- 
alis szaraertekenek karakteres megfeleloje lesz. Az STR fugg- 
veny segitsegevel tehat egy numerikus erteket karaktersoro- 
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zattA konvertAlhatunk. Az eredmenyul kapott karaktersorozat 
azonos azon karakterek sorozatAval, amelyek ugyanezen x 
ertek PRINT utasitAssal valo kiiratisa sorAn megjelennenek. 

STRIN6I <i,j I xf) 

A fuggveny egy i karakter hosszusAga karaktersorozatot ered- 
menyez, amelynek osszes karaktere azonos lesz. A keletkezo 
stringet atkot6 karakterek kodjAt a fuggveny mAsodik operan- 
dusa hatarozza meg. 

Ha masodik operanduskent numerikus kifejezest - j - adunk 
meg, a string e kifejezes aktuAlis erteke Altai meghatAro- 
zott ASCII k6d<l karakterbol fog Allni. Ha a kifejezes karak- 
teres erteket szotgiltat - xl -, a stringet alkoto karakte- 
rek az xS karaktersorozat elsd karakterevel lesznek azono- 
sak. Az i es j kifejezesek aktualis ertekenek a 0...255 
interval lumba kell esnie. 



TAB(i) 



A TAB fuggveny csak a PRINT es LPRINT utasitAsokban alkal- 
mazhatd. Segitsegevel a kurzor a soron belul a megadott 
sorszAmu oszlopig el6re mozgathat6. Az i kifejezes aktuAlis 
ertekenek PRINT utasitAs eseten a 0...41 interval lumba, 
LPRINT utasitAsban a 0...255 tartomanyba kell esnie. Ha a 
kurzor mir talhaladt a megcimzett oszlopon, a TAB fuggveny 
hatastalan. 



TAN(x) 



- Az x kifejezes radiAnban ertelmezett ertekenek tangenset 
szolgAltatja. Az eredmeny minden esetben egyszerespontos 
valos szam lesz. 

VAL(xS) 

Az xS karakteres kifejezes Altai adott szAm numerikus 
erteket adja meg. A VAL fuggveny az STR1 fuggveny ellentet- 
jenek tekinthetd. 

A PRIMO az xS kifejezes karaktereit addig ertelmezi, amig 
azok egy szAm karaktereinek tekinthetok. Ha a string feldol- 
gozAsa kozben egy szAmkonstansban meg nem engedett karaktert 
talAl, befejezi az ertelmezest, es az addig kapott numerikus 
erteket adja erediaenykent. Ha a karaktersorozatban a PRIHO 
nem talAl ertelmezheto szAmot, a VAL fuggveny eredmenyul 0- 
At ad. A szAm egesz-, fixpontos-, vagy lebegdpontos formA- 
ban adhato meg. Ha a szAm elott betftkoz karakterek Allnak, 
azokat a PRIMO figyelmen kivul hagyja. 
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Pelda: PRINT VAL<" -8.439 itt a vege") 
-8.439 

VARPTR(<valtoz6>> 

Eredmenyul a megadott valtoz6nev ertekmezejenek memorian 
beluli kezdocimet adja. A valtoz6 barmely tipusi skalar vagy 
tombvaltozo lehet, de a VARPTR fiiggveny argument uraaban val6 
megjelenest megeldzden mar erteket kellett kapjon, ellenkez6 
esetben FC - Illegal Function Call, Illegal is funkcidhivas - 
hibajelzes keletkezik. Az eredmenykent keletkezo egesz szam 
a -32768... 32767 tartomanyba esik. Ha az ertek negativ, a 
val6di memoriae im 65536 hozzaadasaval allithato elo. 

A VARPTR fuggvenyt altalaban arra hasznaljuk, hogy megsze- 
rezve egy valtoz6 memdriacimet, e valtoz6t - cimenek atada- 
saval - parameterkent egy gepi k6d£i rutin rendelkezesere 
bocsassuk. Ha valtoz6kent egy indexelt valtoz6t adunk meg, 
megtudhatjuk a kerdeses tombelem timet, vagy - ha a tomb 
osszes indexe ertekekent O-at szerepeltetunk - a teljes tomb 
kezdoc imet . 

Egy tomb memoriae ime rninden egyes - eddig erteket meg nem 
kapott - skalar valtozo hasznalatakor megvaltozik. Ezert, ha 
a VARPTR fuggvennyel egy tomb memoriae imet kivanjuk megsze- 
rezni, ugyeljunk arra, hogy ijabb - eddig meg nem hasznaLt - 
skalar valtoz6kat ezutan mar ne hasznaljunk, mert ez progra- 
munk helytelen mfikodeset eredmenyezheti. 
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1. FEJEZET 



A PRIMO BASIC Interpreter makodese 



Ebben a fejezetben osszefoglaljuk a PRIMO BASIC Interpreter 
mftkodesenek megertesehez szukseges Legfontosabb isnereteket. 
Benutatjuk a BASIC program memorian beluli AbrAzolAsAnak mod j At, 
ismertetjuk a BASIC program vegrehajtAsAnak fobb lepeseit. Megad- 
juk a BASIC program vegrehajtasa sorAn keletkezd vAltozd tAblAza- 
tok f STACK bejegyzesek pontos felepiteset, ismertetjuk a karakte- 
res vAltoz6k feldolgozAsAnak lepeseit, kiterunk a kifejezesek 
feldolgozAsAnak menetere. Vegezetul rovid pel daprogr amok segitse- 
gevel bemutatjuk, hogyan tud a Felhasznal6 sajat gepi k6dd prog- 
ramjai szaroara teruletet foglalni a memoriaban. 



1.1. A BASIC program memorian beluli abrizolasa 

A PRIHO BASIC Interpretere a BASfC program gyorsabb es 
egyszerabb vegrehajtisa erdekeben a billentyftzetrdl begepelt 
BASIC programszoveget a mem6riaban atalakitva - u.n. tokenizalt 
formaban - tArolja. Az abrazolAsi m6d lenyege, hogy a program- 
szovegben a BASIC programozasi nyelv kulcsszavai - pi. SOTO, 
PRINT, stb. - es az operitorok -pi. +, -» -t stb. - nem eredeti 
formajukban, hanem Atalakitva kerulnek tArolAsra. Az AtalakitAs 
sorAn az emlitett szimbdluraokat az Interpreter egy 1 byte 
hosszasAgft be I so koddal - u.n. tokennel - helyettesiti. A megol- 
das ket szempontb6l is elonyos. 

Az eredeti alakban adott kulcssz6nAl a token az esetek donto 
tobbsegeben rovidebb, igy az AtalakitAs eredmenyekent a 
BASIC programszoveg tArolAsAhoz kevesebb memdria szukseges. 

Az ismert meretu token egyszerubben kezelhetd, mint a tobb 
karakter hosszasAga kulcsszo, igy szAmos esetben a kulcssza- 
vak feldolgozAsAnak sebessege - vegso soron a BASIC program 
vegrehajtasa - jelentdsen gyorsabban val6sithato meg az 
atkodolt formAban. 

A kulcsszavak tokenekre cserelesen tul az Interpreter az eredeti- 
leg begepelt BASIC programszdvegen meg tovAbbi AtalakitAsokat is 
vegez. Ezek ismet csak a v*grehajtAs sebessegenek fokozAsAt 
celozzAk, de mAr nem jelentenek memdria megtakaritAst, ellenkezd- 
leg, a BASIC programszoveg tArolAsAhoz szukseges tArterulet mere- 
tenek kismertekfli megnovekedesevel jArnak. (A meretnovekedes nem 
jelentos, mivel legrosszabb esetben egy BASIC programsor tokeni- 
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zilis utini meretet 4 byte-tal noveli meg.) A tovibbi italakiti- 
sok a kovetkez6k: 

Az Interpreter a BASIC programszoveg sorait nem a begepeles 
sorrendjeben, hanen az egyes sorok elejen ill6 sor sz amok 
novekvo sorrendjeben tarolja. Igy aztin amikor egy ujabb 
programsort fftzunk a mem6riiban eddig eltirolt BASIC prog- 
ramhozr gyakran szukseges a programszoveg egyes reszeinek 
mem6rian beluli mozgatisa annak erdekeben, hogy az ujonnan 
begepelt programsor a helyere kerulhessen. A fenti tevekeny- 
seg - valamint mis, a BASIC program vegrehajtasa sorin szuk- 
seges, itt nem reszletezett feladatok - hatekonyabb elvegze- 
se erdekeben az Interpreter minden BASIC programsor elejen 
kialakit egy 2 byte-os mezdt, amelyben az aktuilis program- 
sort koveto sor hasonld mezejenek memoria cimet tarolja. 

A BASIC program vegrehajtasa sorin igen gyakran szukseges az 
adott programsor sorsziminak ismerete. Azert, hogy az Inter- 
preter ne kenyszeruljon a karakteres alakban megadott 
sorszim ismetelt Karakteres -» Biniris konverzidjira, minden 
BASIC programsor elejen - az eldbb ismertetett cim-mezot 
koveto - 2 byte-ban a PRIMO eltarolja az adott BASIC prog- 
ramsor sorsziminak biniris megfeleldjet. 

A vegrehajtis alatt alio BASIC programsor vegenek egyszeru 
felismerese erdekeben az Interpreter minden programsor utol- 
s6 karaktere utin elhelyez egy ertekft byte-ot. Igy, ha egy 
sor kovetkezd karaktere 0, ez jelzi az Interpreter szimira, 
hogy az adott programsor feldolgozisa befejezddott, megkezd- 
heti a soronkovetkezd BASIC programsor ertelmezeset. Ha 
azonban a ertekft byte-ot ket tovibbi koveti, akkor ebbol 
a PRIMO Interpretere felismeri, hogy elert a BASIC program 
vegere. Ezutin - tovibbi vegrehajtand6 programsorok hiinyi- 
ban - visszater direkt - parancs - m6dba, es a Felhasznilo 
ujabb parancsira virakozik. 

Az eddig ismertetett italakitisokon tul a PRIMO BASIC Inter- 
pretere a begepelt BASIC programsoron semmifele egyeb italakitist 
nem vegez. Igy pi. ha a begepelt programsor az olvashatdbb formi- 
tumra torekves erdekeben betukozoket tartalmaz, akkor azok vilto- 
zatlan formiban a programszovegben is megtalilhat6k. (Az egyeduli 
kivetel a programsor sorszima es a programsor elsd nen betukdz 
karaktere kozott illo betukozok. Ezeket ugyanis a PRIMO minden 
esetben figyelmen kivul hagyja es el sem tirol ja. ) Ez az Inter- 
preter mukodeset nem befolyisolja, mivel az a BASIC program 
ertelmezese kozben kepes a felesleges betukozok itlepesere. U- 
gyanakkor azonban az egyszerubb programolvasis ira a nagyobb 
memoria igeny es a BASIC program vegrehajtisinak lassulisa lesz. 
Az utdbbi szempont gyakorlatilag lenyegtelen, mivel a sebesseg- 
csokkenes szinte eszrevehetetlen. A szukseges memoria meretenek 
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novekedese mar tobb figyelmet erdemel. Ha a BASIC progranunk 
olyan nagy meretflii hogy tarolasa es futtatasa mar gondot okoz - 
nevezetesen OH - Out of Memory, Betel t a memoria - hibajelzest 
kapunk, akkor az egyebkent felesleges bet&kozok kitorlesevel 
esetleg meg megoldhatd a program futtatasa. 

A kdvetkezdkben az eddig teirtakat egy abran szemleltetjuk. 
Ket egyszerft BASIC programsor peldajan bemutatjukr hogyan tarolja 
a PRIHO a BASIC programszoveget. 

Legyenek a BASIC utasitasok a kovetkezok: 

1000 X=2»PI-L0B(A) 
1010 GOTO 200 

Tetelezzuk fel, hogy ez a ket utasitas egy nagyobb BASIC 
program utolso ket utasitasa. Tegyuk fel tovabba, hogy az 
1000-es sorszama sor a memoriaban a 20480? 5000 cimtol kezdve 
tarolodik. (Az abraban szerepld valamennyi kod erteket deci- 
malis es hexadecimalis alakban kifejezve adjuk meg.) 



20480? 5000 






15; OF 


Kovetkezo sor cim als6 byte 


20481; 5001 r— 




80; 50 


fel so byte 


20482; 5002 






232; E8 


BASIC sor sorszama alsd byte 


20483; 5003 






03; 03 


fel so byte 


20484; 5004 




X 


88; 58 




20485; 5005 




s 


213; D5 


Token 


20486; 5006 




2 


50; 32 




20487; 5007 




* 


207; CF 


Token 


20488; 5008 




PI 


200; C8 


Token 


20489; 5009 




- 


206? CE 


Token 


20490; 500A 




LOS 


223; DF 


Token 


20491 ;500B 




( 


40; 28 




20492; 500C 




A 


56; 41 




20493; 500D 




) 


41; 29 




20494 ;500E 






00? 00 


Sorveg 


20495; 500F 


— * 




25; 19 


Kovetkezd sor cim als6 byte 


20496; 5010 






80? 50 


fel so byte 


20497; 5011 






242? F2 


BASIC sor sorszama alsd byte 


20498; 5012 






03; 03 


fel so byte 


20499; 5013 




GOTO 


141 ?8D 


Token 


20500; 5014 






32? 20 


betakoz 


20501; 5015 




2 


50? 32 




20502; 5016 







48? 30 




20503; 5017 







48? 30 




20504; 5018 






00? 00 


Sorveg 


20505; 5019 


— » 




00? 00 


Programveg jel #1 


20506; 501A 






00? 00 


jet *2 
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1.2. A BASIC Interpreter rtkodese 

A PRIHO bekapcsolAsa es a szukseges kezdeti beAllitAsok utAn 
a szAmit6gep vezerleset a BASIC Interpreter veszi At. A kepernyd 
legfelsd sorAban megjeleniti a 

PRIMO BASIC SYSTEM '84.1 

feliratotr majd a gep direkt - parancs - modban a Felhasznild 
parancsaira vArakozik. Ennek sorAn folyamatosan vizsgAlja a bil- 
lentyazetet, es ha egy billentya megnyomAsAt erzekeli, a gomb 
Altai jelkepezett karakter kddjAt a Billentyazet puffer kovetkezd 
szabad cimere helyezi. Az Interpreter a leirt tevekenyseget addig 
ismetli, amig a BRK, ill. RETURN billentya megnyomAsAt nem ta- 
pasztalja. Ekkor az esemenyek a kovetkezdkeppen alakulnak: 

Ha a BRK billentyftt erintettuk meg f az Interpreter az eddig 
a Billentyftzet pufferbe tArolt k6dokat "elfelejti", majd egy 
iljabb sor begepelesere vArakozik. 

Ha a RETURN billenty&t nyomtuk meg, de elfitte - a bet&koztGl 
kulonbozd - mAs gombot meg nem, az Interpreter ugyanagy jAr 
el, mint ha a BRK Lett volna aktiv. Ha a RETURN megerintese 
elfitt mAr begepeltunk egy - maximAlisan 210 karakter 
hossz&sAgd - sort, akkor megkezdodik ennek a sornak a fel- 
dolgozAsa. 

Egy sor feldolgozAsa azzal kezdodik, hogy a PRIHO Atalakitja 
a begepelt sort. Ennek sorAn a Billentyazet pufferben tArolt 
karaktersorozatban talAlhatd valamennyi BASIC kulcssz6t es mftve- 
leti jelet a megfelelo belsd k6ddal - tokennel - helyettesiti. 
EzutAn att6l fuggden, hogy a sor elejen Allt-e sorszAm vagy sem, 
a PRIMO kulonbozo modon folytatja a sor tovAbbi feldolgozAsAt. 

Ha a sor elejen Allt sorszAm, a tovAbbi mflkodes menete a kovetke- 
zd: 

Az Interpreter megvizsgAl ja, hogy kovetik-e tovAbbi karakte- 
rek is a sorszAmot. Ha nem - vagyis a sor csak egy sorszAmot 
tartalmaz - a PRIHO az eddig begepelt es a memoriAban firzott 
sorok kozul - ha van ilyen - kitorli a megadott sorszAma 
sort, majd egy ijabb sor begepelesere vArakozik. 

Ha a sorszAm utAn tovAbbi karakterek is talAlhatok, a PRIHO 
megvizsgAlja, hogy a megadott sorszAmmal van-e mAr a memori- 
Aban programsor. Ha talAl ilyet, akkor a regi sort a most 
begepelt Cij sorral csereli fel. Ha ilyen sorszAma sor meg 
nem letezett, akkor a most begepelt sort tArolja el, majd 
egy djabb sor begepelesere vArakozik. 
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AkAr sor tor lest, akAr sor beillesztest kell vegrehajtani, 
szuksegesse vAlik a mem6riAban orzott BASIC programszoveg 
tArolon beluli mozgatAsa. Ennek sor An a PRIMO a kovetkezo 
muveleteket hajtja vegre: 

MeghatArozza a BASIC programszoveg azon pontjAt, amely- 
tol kezdddden - a tArolo magasabb cimeinek irAnyAba - a 
memoriaterulet elmozditAsa szukseges. 

Ha sor tor I est kell vegrehajtani, a PRIMO az eltavoli- 
tando sort koveto programszoveget a memoriAban a feles- 
legesse vAlt sor Altai eddig elfoglalt byte-ok szAmAval 
a tarol6 kisebb cimeinek iranyaba eloretolja. 

Ha sor beillesztes a feladat, az Interpreter az uj sort 
a sorszAmok sorrendjeben koveto programsortdl kezdddoen 
az uj sor hosszAnak megfelelo byte szAmmal a tarol6 
magasabb cimeinek iranyaba hAtratolja. EzutAn a Billen- 
tyuzet pufferbdl az uj sort a keletkezett szabad teru- 
letre mAsolja. 

A BASIC programszoveg kivAlasztott reszenek elmozditAsa 
utAn az Interpreter a programsorok elejen ill6 - a 
kovetkezo sor kezducimet tartalmaz6 - mezoket az Cij 
helyzetnek megfelelfien beillitja. 

Ha a sor elejen nem all sorszAm, vagyis a begepelt sor egy BASIC 
parancsot, ill. egy parancs modban megadott BASIC utasitAst tar- 
talmaz, a mukodes tovabbi menete a kovetkezo: 

A PRIMO megvizsgAlja, hogy a sorban AU6 elso - betukozt6l 
kulonbozd - karakter token-e. Amennyiben nem, az Interpreter 
ugy tekinti, hogy az egy BASIC vAltoz6 1. karaktere. Mivel 
utasitis elejen vAltozd csak az ertekadas muveletben szere- 
pelhet, a PRIMO szubrutinkent aktivizAlja az ertekadast 
vegrehajt6 rutint. A sor tovabbi feldolgozAsAt mar ez fogja 
vegrehajtani. 

- Ha a begepelt, es belsd AbrAzolAsi modra Atalakitott sor 
elsd - betukoztol kulonbdzo - karaktere egy token, a PRIMO 
BASIC Interpretere egy - ROM-teruleten elhelyezkedo 
tAblAzat felhasznAlAsAval megAllapitja az adott BASIC utasi- 
tas, ill. parancs ertelmezesere es vegrehajtAsAra hivatott 
alprogram cirnet. A cim meghatArozAsa utan a PRIMO megkeresi 
a sorban kovetkezo elso nem betukoz karaktert, majd mi utan 
ennek memoriacimet elhelyezte a HL regiszterpArban, szubru- 
tinkent aktivizAlja a sor tovAbbi ertelmezeset vegrehajtA 
alprogramot. 

Az egyes utasitAsok feldolgozAsAt vegz6 szubrutinok teve- 
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kenyseguk befejeztevel egy RET utasitAs segitsegevel lephet- 
nek vissza az Interpreter Kozponti vezerlo reszebe. MiutAn e 
Kozponti vezerlfi resz ismet megkapja a PRIMO irAnyitAsAt, az 
eddig leirtak egy ijabb sor bevetelevel, ertelmezesevel, 
stb. ismetlddnek. 

A parancsok kozutl ketto - a RLNM es a CONT - kituntetett 
jelentoseg&ek. Ezek vegrehajtAsa utAn ugyanis a PRIMO irAnyitAsAt 
nem az Interpreter Kozponti vezerlo resze k^jja vissza, hanem a 
memoriAban orzott BASIC program. Ez az Allapot mindaddig nem is 
vAltozik meg, amig a PRIMO eL nem er a tArolt BASIC program 
vegere, ill. vegre nem hajt egy STOP vagy END utasitAst. Ekkor 
ismet az Interpreter Kozponti vezerlo resze lep m&kodesbe. (A 
PRIMO hAtoldalAn elhetyezett RESET billentyft megnyomAsa is meg- 
szakitja a program futAsAt, es az irAnyitAst az Interpreter 
Kozponti vezerl6 resze veszi At.) 

A RUN parancs vegrehajtAsakor a BASIC program elinditAsAn 
till az Interpreter meg szAmos feladatot hajt vegre. A kovetkezok- 
ben ezeket a tevekenysegeket foglaljuk ossze. 

ValahAnyszor begepeljuk a RUN parancsot, a PRIMO 

a kulonfele bet&kkel kezd6d6 vAltoz6k tipusAt meghatArozo 
tAblAzat minden elemebe egyszerespontos valos tipusjelzest 
helyez. Ennek megfeleloen a BASIC program mindazon vAltoz6- 
jAnak tipusa - amely DEFxxx utasitAsok, ill. t ipusazonosito 
karakterek segitsegevel ellenkez* ertelmezest nem kap - egy- 
szerespontos valos lesz. 

alapAllapotba Allitja a "Programozott hibakezeles folyamat- 
ban" Al lapot jelzot. 

torli valamennyi korAbban erteket kapott skalAr es indexelt, 
numerikus es karakteres vAltozo erteket. 

A fenti feladatok vegrehajtAsa utan megkezdddik a PRIMO memdria- 
jAban tArolt BASIC program vegrehajtAsa. 

(Az Interpreter m&kodesenek a fentieknel reszletesebb - pi. az 
egyes BASIC utasitAsok es parancsok ertelmezeset vegrehajtd ruti- 
nok reszletes - ismertetese meghaladnA a rendelkezesre Alio ter- 
jedelmet . ) 

1.3. A BASIC vAltozok tAblAzatai 

A PRIMO a BASIC program vegrehajtAsa kozben felismert vAlto- 
zokat az u.n. vAltozd tAblAzatokban 6rzi. Egy vAltozo att6l 
fuggoen, hogy skalAr, ill. tomb vAltoz6-e, kulonboz6 formAban 
kerul a mem6riAba. A BASIC Interpreter m&kodese sorAn ket vAltoz6 
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tAblAzatot; a skalAr vAltozdk es az indexelt - tomb - vAltoz6k 
tAblAzatAt epiti fel. (A PRIMO a numerikus vAltozoktol elterd 
m6don dolgozza fel a karakteres vAltozokat. Ez ut6bbiak kezelese- 
nek reszletei az 1.4. Fejezetben talAlhat6k.) 

Amikor a PRIMO megkezdi a mem6riAban tArolt BASIC program 
vegrehajtAsAt, a vAltoz6 tAblAzatok meg uresek. Minden alkalom- 
mal, amikor az Interpreter a BASIC programszovegben egy iijabb 
vAltozot ismer fel, megvizsgAl ja, hogy szerepel-e mar a kerdeses 
vAltoz6 a formAjAnak - skalAr, indexelt - megfelelo tablazatban. 
A vAlasz fuggvenyeben az Interpreter a kovetkezokeppen folytatja 
mukodeset: 

Ha az adott vAltoz6 meg nem szerepel a formajanak megfelelo 
tablazatban, akkor most az Interpreter beilleszti a megfele- 
lo helyre. Ennek sorAn a tablazatba kerul a vAltoz6 tipusa - 
egesz tipusii, egyszerespontos, ill. duplapontos valds, ka- 
rakteres -, a vAltoz6 maximAlisan ket karakter hosszusAgti 
neve, valamint a vAltozd Altai kepviselt ertek. Ha a vAltozo 
indexelt, az Interpreter a felsorolt adatokon till meg az 
indexek szAmAt, es az egyes indexek maximAlis erteket is a 
tAblabejegyzesbe tArolja. 

Ha a vAltozo mAr megtalAlhat6 a megfelel6 tAblAzatban, akkor 
az Interpreter a vegrehajtott BASIC utasitAs fuggvenyeben 
vagy csak beirja - ertekadAs -, vagy csak kiolvassa a 
tAblAzatb6l a kerdeses vAltoz6 erteket. 

A vAltozi tAblAzatok a memoriAban a BASIC programszoveg 
mogott helyezkednek el. A mem6ria kisebb cimein a skalAr vAltozo 
tAbla, ezt kovetoen az indexelt vAltoz6 tAbla talAlhat6. A BASIC 
program mddositAsakor, ill. a program ujra inditAsakor a tAblAza- 
tok mindig torlodnek. Ha egy lij skalAr vAltozd kerul a skalAr 
tAblAba, a vAltoz6 szAmAra szukseges hely eloteremtese erdekeben 
az indexelt vAltozok tAblAzatAt az Interpreter a memoria magasabb 
cimeinek irAnyAba elmozditja. EzutAn a PRIMO az uj vAltozot a 
skalAr tAbla vegere illeszti. (A leirtakbol lAthat6, hogy egy 
skalAr vAltoz6 tAbla-cime a BASIC program vegrehajtAsa sorAn nem 
vAltozik meg. Az indexelt vAltoz6k cime azonban minden ujabb 
skalAr vAltozo elofordulAsAval mudosul. Ezt azert fontos megje- 
gyezni, mert a VARPTR fuggveny - amely egy vAltoz6 memoria cimet 
adja - alkalmazAsakor e teny figyelmen kivul hagyAsa a BASIC 
program szAndekunktol eltero futAsAt eredmenyezheti . ) 

A kovetkezokben reszletesen ismertetjuk az egyes tAblAzatok 
kulonfele bejegyzeseinek felepiteset, az egyes mezok ertelmeze- 
set: 
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Skalar valtaz6 tibia bejegyz£sek 

A skalar valtozo tablaban a valtozik negy lehetseges tipusa- 
nak - egesz, egyszerespontos, duplapontos, karakteres - megfele- 
I6en negy kulonfele bejegyzes talalhatd. A bejegyzesek rendre 5, 
7, 11, ill. 6 byte meret&ek. Egy bejegyzes logikailag ket reszre 
- Nev-mez6, £rtek-mezo - bonthat6. A Nev-mez6 minden bejegyzesben 
azonos felepitesu. 

A Nev-mezo 1. byte-ja a valtozo tipusara jellemzo erteket 
tarolja. Ez egesz tipusu valtoz6 eseten 2, egyszerespontos 
vat 6s valtoz6nal 4, duplapontos val6s tipus eseten 8, karak- 
teres valtoz6nal 3. (Ez az ertek tulajdonkeppen az fertek- 
mezo byte-ban mert hosszat jelzi.) A Nev-mezo tovabbi ket 
byte-ja a valtozd nevenek el so ket karakter et tarolja. Ennek 
megfelelden ugyan megadhatunk ket karakternel hosszabb 
valtozo-nevet is, de a PRIMO csak az el so ket karaktert 
tekinti ertekesnek. Ha a valtozd neve csak egy karakter 
hosszi, az Interpreter a 2. karakter helyere erteket 
tarol. 

Az trtek-mezo a negy lehetseges valtoz6 tipusnak megfeleloen 
negy fete lehet. Az ertek-mezo a Nev-mez6ben alio tipusazo- 
nositd k6d altal meghatarozott hosszusagCi. 

A kovetkezo abrak a negy lehetseges skalar tibia bejegyzes 
felepiteset szemteltetik. (Az £rtek-mez6k felepitesevel kapcso- 
latban reszletes ismeretek az 1.4 es 2. Fejezetekben talalhatdk. > 

Egesz tipusO. tab I a elea 



Tipus k6d ( = 2 ) 



Valtozonev 2. karaktere 



valtozonev 1. karaktere 



fertek kevesbe ertekes 8 bitje 



fertek ertekesebb 8 bitje 
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Egyszerespontos val6s tibia elea 



Tipus k6d < = 4 ) 


- 


Valtozinev 2. karaktere 


Valtozonev 1. karaktere 


Mantissza legkevesbe ertekes 8 bi 


tje 


Mantissza kozbulso 8 bitje 


Mantissza legertekesebb 8 bitje 


Kitevi 



Duplapontos valds tab I a elea 



Tipus k6d ( = 8 ) 


Valtozonev 2. karaktere 


valtozonev 1. karaktere 


Mantissza legkevesbe ertekes 8 


bitje 


Mantissza kozbulso 8 bitje 


#1 


Mantissza kozbulsd 8 bitje 


#2 


Mantissza kozbulso 8 bitje 


#3 


Mantissza kozbiilsd 8 bitje 


#4 


Mantissza kozbulsd 8 bitje 


#5 


Mantissza legertekesebb 8 b: 


tje 


Kitevo 
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Karakteres tipusft tibia ele« 



Tipus k6d < = 3 > 



Viltoz6nev 2. karaktere 



Viltozdnev 1. karaktere 



fertek-hossz 



irtek cim kevesbe ertekes 8 bitje 



fertek cim ertekesebb 8 bitje 



(A karakteres viltozok kezelesenek reszletei az 1.4. 
Fejezetben talAlhatok meg.) 

Indexelt vAltozo tabla bejegyzesek 

Akir a skalAr viltoz6 tiblAban, az indexelt vAltozo tablaban 
is alapvetoen negyfajta bejegyzes talAlhato. Azonban az i"dexek 
elter6 szAma miatt az egyes bejegyzesek felepitese kulonbozo 
lehet. Az indexelt tibia egy bejegyzese logikailag hirom reszre 
Nev-mezc., Index-mez6, fertek-mezft - bonthat6. A Nev-mez6 es az 
fertek-mezo felepitese a skalar viltoz6 tibia leirAsAban megismert 
formitummal - eltekintve attol, hogy az £rtek-mez6 nem egyetlen, 
hanem a tomb valamennyi elemenek erteket orzi - azonos. Az Index- 
mezd felepitese a kovetkezo: 

- Mivel az indexelt viltozd tibia bejegyzesei - a tombelemek 
kulonbozo szima miatt - eltero hosszasAgdak, a kovetkezo 
tabla bejegyzes elejenek gyors megtalAlAsa erdekeben az 
Index-mezo elso ket byte-ja az aktuilis tibia bejegyzes 
hosszit 6rzi. Igy a kovetkezd tibia elem cime az aktualis 
elem ciraenek es tirolt hosszinak ismereteben egy osszeadis- 
sal meghatArozhat6. 

A PRIHO a tombvAltozok indexeinek szimit gyakor lati lag nem 
korlatozza - elmeletileg egy tomb 255 dimenzios lehet -, 
tovAbbA az Interpreter ket azonos nevtt tombot kulonbozonek 
tekint, ha indexeik szima eltero. Ezert, szukseges, hogy a 
PRIHO az Index-mez6ben eltirolja az aktuilis tomb indexeinek 
szAmAt. Igy az Index-mezo soronkovetkez* byte-ja elojeltelen 
egesz szim formijiban ezt az erteket 6rzi. (A tomb indexei- 
nek szimit a BASIC DIH utasitisival hatArozhat juk meg. ) 

- Az Index-mezo hAtralevo reszeben a PRIHO az egyes indexek 
maximilis ertekeit - pontosabban a maximilxs ertek + 1 et 
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tArolja. Egy-egy index-ertek tArolAsAra 2 byte szolgAl, 
amelyben az Interpreter az index-erteket elojeltelen egesz 
szAm formAjAban tArolja. Ennek megfelelden egy index maximA- 
lis erteke elvileg 65535 lehet. (Gyakorlati lag ekkora ertek 
a mem6ria korlAtozott merete miatt nem adhatu meg.) A be- 
jegyzesben tArolt index-ertekek szAnta az indexek szAmAval 
azonos. 

A leirtak figyelembe vetelevel az Index-mezo byte-ban mert 
hossza a kovetkezd keplet segitsegevel hatArozhat6 meg: 

Index-mez6 hossza=3+2*( indexek szAma) 

Az indexelt vAltozo bejegyzes £rtek-mezejeben az indexek 
szAma, es az egyes indexek maximAlis erteke Altai meghatArozott 
szAmii egyedi ertek tArolhat6. Egy-egy ertek tArolAsa azonos a 
skalAr vAltozoknAl megismerttel . 

A PRIHO a tomb elemeit oszlopfolytonosan tArolja. Ez azt 
jelenti, hogy az indexek koziil leggyorsabban az elso - bal szelso 
- vAltozik. Ennek megfeleloen, ha pi. az A nevd tomb ket dimenzi- 
6s, es a baloldali index maximAlis erteke 2, a jobboldali index 
maximAlis erteke 1, akkor a tomb 6 eleme a kovetkezd sorrendben 
helyezkedik el az fertek-mezoben: (Az indexek els6 erteke minden 
esetben a 0. ) 

A(0,0) A(1,0) A(2,0) A(0,1) A(l,l) A(2,l> 

Mivel az £rtek-mez6ben az egyes ertekek kozott semmilyen 
elvAlaszt6 jel nem All, a PRIMO az egyedi ertek cimet hatArozza 
meg. Ennek ismereteben mAr az ertek kiolvasAsa/modositAsa egysze- 
rften megoldhat6. ValahAnyszor egy ertek egyedi cimet meg kell 
hatArozni, az Interpreter kiszAmolja az u.n. cimfuggveny aktuAlis 
erteket. A kiszAmolando kifejezes a kovetkezfi alakii: 

C=KC+H*£...(((I »M ,+I .)»M +1 )»I1 ,+I ,)*... «M 1 +I 1 ) 
n n-1 n-1 n-2 n-2 n-3 n-3 1 1 

ahol C = a keresett ertek cime 

KC = az fertek-mezfl kezddcime 

H = az ertekmezdben tArolt ertekek hossza (2,3,4,8) 

I = az aktuAlis index-ertek 

M = a maximAlis index-ertek+1 

n = az indexek maximAlis szama 

PI. tekintsuk az X egyszerespontos val6s tombot. A tomb hArom 
dimenzids, a maximAlis index-ertekek rendre 5,3,6. A tomb trtek- 
mezejenek memoriAn beluli kezdocime 23471. Keressiik az X(3, 1,4) 
tombelem cimet: 

C=23471+4»C (4*4+1 )*6+3} -» 23891 
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Az eddig leirtak illusztrAlAsAra a kovetkezo Abra bemutatja 
az elozo peldAban szerepl6 X tomb Index-mezejenek felepiteset, az 
egyes mezdk - vAlasztott peldAnak megfelelo - ertekeit: 



£rtek 


-me2 


:6 hossz kevesbe 


ertekes 


8 bitj 


e 




£r 


tek- 


-mez6 hossz ertekesebb 8 


bitje 










Max] 


mil is indexszAm 






— 




1. 


index 


maximal is 


erteke 


+ 1 


— 


— 




2. 


index 


maximal is 


erteke 


+ 1 


— 


— 




3. 


index 


maximal is 


erteke 


+ 1 


— 



= 160 

2 

_. *1 
— J 

6 

4 

7 




1.4. Karakteres vAltozdk kezelese 

Ellentetben a kul6nb6z6 tipusii numerikus vAltoz6kkal r melyek 
tArolAsAhoz minden esetben rogzitett mereta mem6riahely szukse- 
ges, a karakteres valtozdk a bennuk pi I lanatnyi lag tArolt karak- 
tersorozat hosszAnak fuggvenyeben vAltozo mereta mem6riateruletet 
igenyelnek. E sajAtossAg kovetkezteben a karakteres vAltozuk a 
numerikus vAltoz6k feldolgozAsAtAl jelent6sen kulonbozo kezelest 
igenyelnek. A kovetkezokben Attekintjuk a karakteres valtoz6k 
memoriAn beluli tArolAsAval, es feldolgozAsAval kapcsolatos fon- 
tosabb ismereteket. 

A PRIMO BASIC Interpretere 0...255 karakter hosszusAgii ka- 
raktersorozatokat kepes kezelni. Egy karakteres vAltozd aktuAlis 
erteke is hasonlo hossziisAga lehet. Mivel azonban a karaktersoro- 
zat hossz Anak vAltozAsa fuggvenyeben mAs es mAs mereta mem6ria 
szdkseges a vAltoz6 tArolAsAhoz, a PRIMO a karakteres vAltozokat 
ket reszletben - Leird-resz, £rtek-r*sz - tArolja. E megoldAs 
elonye, hogy egy karakteres vAltozo mindig csak az aktuAlis 
erteke Altai pi I lanatnyi lag szukseges memoriateruletet foglalja 
el. Az alkalmazott megoldAs hAtrAnya, hogy nernileg lassabb vegre- 
hajtAsi sebesseget eredmenyez> mint a memdriAval kevesbe takare- 
koskod6 m6dszerek. 

A karakteres vAltoz6t leird tAblaelem tehAt ket reszb6l All. 
A ket resz nemcsak logikailag vAlik szet, hanem a memiriAban is 
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kulonbozo teruleteken helyezkedik el. A Leir6-resz - amely minden 
esetben 3 byte mereta - a skalAr-, ill. - ha a vizsgAlt karakte- 
res viltoz6 tombvAltoz6 - az indexelt vAltozi tAblAban talAlhat*. 

A karakteres vAltozo Leir6-resze logikailag tovAbbi ket 
reszre - fert*k-hossz, fertek-cU - bonthat6. Az fertek-hossz 1 byte 
mereta, az fertek-cim tArolAsAhoz 1 szo -2 byte - szukseges. Az 
egyes reszek jelent&se a kovetkezd: 

Az fert£k-hossz drzi a karakteres vAltozo aktuAlis ertek^nek 
pillanatnyi hosszAt. Az 1 byte-os mezdben a PRIMO egy el6- 
jeltelen egesz szAmot tArol. Ennek megfeleloen a mezo erteke 
0...255 kozott vAltozhat. A mezo 1 byte-os meretebol kovet- 
kezik, hogy a PRIMO nem kepes 255 karakternel hosszabb 
karaktersorozatokat feldolgozni. Ha a karaktervAltozd aktuA- 
lis Erteke egy ures karaktersorozat - amely egyetlen karak- 
tert sem tartalmaz -, az fertek-hosszban talAlhatd. 

- Az fertek-cim a karaktervAltozd aktuAlis erteket jelkepezo 
karaktersorozat memdriacim*t 6rzi. Ez egy 2 byte-os mez6, 
tehAt a karaktersorozatot a PRIMO memoriAjAban bArhol elhe- 
lyezhetjuk, a rendelkezesre 4116 16 bit elegendd a cim 
tArolAsAhoz. Ha a Leir6-resz fertek-hossz mezejenek aktuAlis 
erteke 0, az fertek~cim tartalma erdektelen. 

A karakteres vAltozo Leird-reszenek felepitese tehAt a kovetkezd: 



fertek-hossz 



fertek-cim kev£sbe ertekes 8 bitje 



fert£k-cim ertekesebb 8 bitje 



A karakteres vAltoz6k fertek-resze a tulajdonkeppeni tArolt 
£rt£k. Az £rt£k-resz olyan hosszu, mint a benne tArolt karakter- 
sorozat. Att6l fuggden, hogy a karakteres vAltozd Altai pillanat- 
nyi lag drzdtt karaktersorozat - mAsneven string - egy a BASIC 
programban megadott karakteres konstans, vagy egy korAbban kier- 
tekelt karakteres kifejezes eredmenye, az fertek-r£sz a memdria 
kuldnbdzd teriiletein talAlhatd. 

Ha a tArolt string egy karakterkonstans, akkor az fertek-resz 
magAban a BASIC programszdvegben talAlhatd. Tgy nem szukse- 
ges egy karakterkonstanst ket helyen - a BASIC programban, 
ill. a vAttozdteruleten - drizni. Ez jelentds memoria megta- 
karitAst es vegrehajtAsi sebesseg novekedest eredmenyezhet. 

- Abban az esetben, ha a tArolt string egy korAbban kiertekelt 
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karakteres ki f ejezes eredmenye, akkor az fertek-resz a mem6- 
riiban a karakteres vAltozok fertek-reszeinek tArolAsAra 
elkulonitett teruleten - az u.n. KaraktervAltozd teruleten - 
talAlhatd. Ez a terulet a Kepernyd RAM es a STACK kozott 
helyezkedik el. A BASIC Interpreter a PRIMO bekapcsolAsakor 
a KaraktervAltozd teruletet 50 byte kiter jedesure definial- 
ja. Ez azt jelenti, hogy a BASIC program Altai hasznAlt 
mindazon karakteres vAltozd, amely pi llanatnyi lag nem karak- 
terkonstanst tArol, £rtek-reszenek egyuttes merete nem ha- 
ladhatja meg az 50 karakter hossz usAgot . Ez mAr egyszerd 
programok eseten is kevesnek bizonyulhatf ezert lehetseges 
az emlitett terulet meretenek BASIC programbdl vezerelt 
megvAltoztatAsa (novelese, vagy akAr csdkkentese is). Ezt a 
feladatot a BASIC CLEAR utasitAsa hajtja vegre (Id. 1. R£SZ 
2.2. fejezet). Mivel a CLEAR utasitAs valamennyi vAltozd 
aktuAlis erteket torli, a KaraktervAltoz6 terulet, - merete- 
nek meghatArozAsa utAn - mindaddig ures, amig az els6 karak- 
teres ertek tArolAsa be nem kdvetkezik. 

Mint lAttuk, a karakteres vAltoz6k aktuAlis erteke - ha az 
nem egy karakterkonstans - a KaraktervAltozd teruleten tArolddik. 
Amikor egy tijabb karakteres vAltozd erteket kell eltArolni, ill. 
egy korAbban mAr felhasznAlt karakteres vAltoz6 kap uj erteket, a 
PRIMO BASIC Interpretere elhelyezi a stringet a KaraktervAltoz6 
teruleten. A terulet feltdltese a kisebb memdriacimek irAnyAbdl a 
^nagyobbak fele halad. A kdvetkezd egyszeru BASIC utasitAs vegre- 
hajtAsAnak elemzesevel tekintsuk At, hogyan is kezeli a PRIHO a 
KaraktervAltozd teruletet. 

Legyen a vegrehajtandd utasitAs a kovetkezd: 

10 KSS=KSS+"A" 

Az utasitAs a KSt karaktervAltozd korAbbi ertekehez hozzAfuzi az 
"A" stringet - konkatenAci6 -, majd a vAltozd uj aktuAlis erteke 
az igy keletkez6 karaktersorozat lesz. 

A KSS karaktervAltozd kezdeti erteke egy karakterkonstans, 
egy korAbban vegrehajtott karakteres kifejezes aktuAlis erteke, 
vagy az ures string lehet. Tetelezzuk fel, hogy KSS aktuAlis 
erteke egy karakteres kifejezes korAbbi kiertekelesekor keletke- 
zett. Ennek megfelel6en az a KaraktervAltozd teruleten talAlhatd. 
A 10 sorszAmu BASIC utasitAs vegrehajtAsakor KSS korAbbi 
ertekenel eggyel hosszabb string keletkezik, igy az nem tArolhatd 
az eredeti karaktersorozat helyen. Ezert a PRIMO megvizsgAl ja, 
hogy a KaraktervAltozd teruleten rendelkezesre All-e egy akkora 
memdriaresz, amelyben az uj string eltArolhat6. 

Ha rendelkezesre All a szukseges hely, akkor az Interpreter 
betolti ^rr& a teruletre a kiertekeles sorAn keletkezd uj 
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stringet, majd a KS$ vAltozo leir6jAba elhelyezi az eredmeny 
hosszAt es cimet. Az trtek-cimben a karaktersorozat 1. ka- 
rakterenek memoria cime talAlhato. Mivel a PRIMO a stringe- 
ket a KaraktervAltoz6 teruletre novekvd cimek irAnyAba he- 
lyezi el, igy a 2. karakter cimet ugy kapjuk, hogy az 1. 
karakter cimet eggyel megnoveljuk, s.i.t. A KSi korAbbi 
erteke Altai elfoglalt terulet felszabadul, az Interpreter 
azt egyeldre nem hasznAlja fel. 

- Ha a KaraktervAltoz6 terulet vege es a teruleten utoljAra 
eltArolt string vege kozott nines mAr akkora mem6riaresz, 
amely az uj string tArolAsAhoz szukseges, akkor a PRIMO 
megkezdi a KaraktervAltoz6 teruleten elhagyott - mAr felsza- 
badul t - teruletek osszegyujtese't. Ezt a tevekenyseget sze- 
metgyujtesnek - garbage collection - nevezik. Ennek sorAn az 
Interpreter felderiti, hogy a KaraktervAltoz6 teruleten hoi 
talAlhatd elhagyott mez6, es ezeket - az ertekes stringeket 
tArolo teruletek kisebb mem6ria cimek irAnyAba torten6 el- 
mozditAsAval - a Karakter vAltozo terulet vegen egyetlen 
osszefuggd mezfive egyesiti. Tgy - mikozben a karakter es 
vAltoz6k Leiro-reszeben tArolt fertek-cim mezdk tobbsegenek 
tartalma az uj helyzetnek megfeleloen m6dosul - lehetove 
vAlik, hogy az Interpreter lefoglalja az igenyelt teruletet 
az uj string szAmAra. (Ha a KaraktervAltoz6 terulet 
tomoritese utAn sines elegendo hely az uj karaktersorozat 
tArolAsAra, akkor a PRIMO OS - Out of String Space, Betel t a 
Karakter terulet - hibAt jelez.) 

1.5. STACK bejegyzesek 

A PRIMO BASIC Interpretere a mukodesehez szukseges rendszer- 
vAltozdk erteket a BASIC Interpreter vAltoz6 teruleten 6rzi. 
NehAny esetben azonban ez a megoldAs nem alkalmazhat6, mert egyes 
rutinok mukodesuk sorAn szubrutinkent onmagukat is meghivhatjAk 
(rekurziv hivAs). Az ujraindulAs sorAn a rutin felulirja RAM-ban 
levo munkavAltoziit, igy visszaterve a szubrutinbol, az eredeti 
vAltoz6 ertekek mAr nem Allnak rendelkezesre. 

A fent leirt problema megszuntetese erdekeben a PRIMO azon 
rutinjai, amelyek megengedik az ujrainditAst - u.n. reentrAns 
rutinok - munkavAltozoikat nem a BASIC Interpreter vAltoz6 teru- 
let en , hanem a STACK-ben 6rzik. 

Egy BASIC program vegrehajtAsa sorAn olyan esetben szukseges 
a rekurziv hivAs, ha egy program-struktura belsejeben egy, a 
kulso program-strukturAval azonos belsd program-struktura helyez- 
kedik el. A BASIC programozAsi nyelvben hArom ilyen - kul on leges 
kezelest igenyl6 - struktura fordulhat el6: 

egymAsba Agyazott ciklusok (a ciklus magjAban egy mAsik 
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ciklus van) 

- egymasba agyazott szubrutinok (a szubrutinban egy ajabb 
szubrutin hivas szerepel) 

- egymasba agyazott kifejezesek (egy kifejezesben - zar6jelek 
koze zarva - egy resz-ki f ejezes talalhato) 

Ezekben az esetekben tehat a BASIC Interpreter bizonyos 
rutinokat egyszeresen - vagy akar tobbszorosen is - ajraindit. A 
rekurzi6 okozta problemak megszuntetesere ilyenkor egy - a vegre- 
hajtott utasitasra jellemzd - adatcsomag kerul a STACK-be. 

FOR-adatcsoaag felepitese 

valahanyszor a BASIC Interpreter a program vegrehajtasa 
soran egy FOR utasitast eszlel, meghatarozza a vegrehajtand6 
ciklus valtozojanak memoria cimet, valamint kiertekeli a ciklus- 
valtozo kezdo- es vegerteket, ill. a lepeskozt megadd kifejezesek 
aktualis erteket. Ezutin beallitja a ciklusvaltoz6 kezdoerteket, 
najd - felkeszulve a ciklusok eset leges egymasba agyazasara - a 
ciklusvaltozo vegerteketf a novekmenyt, valamint nehany tovabbi 
informaciot egy adatcsomag formajaban a STACK-be ment. E mavele- 
tek elvegzese utan megkezd6dik a ciklus magjanak - amely tehat 
ajabb FOR utasitast is tartalmazhat - vegrehajtasa. 

A ciklusmag veget egy NEXT utasitas jelzi. Ekkor a PRIMO 
BASIC Interpretere megkeresi a STACK-ben azt az adatcsomagot, 
amely a most megtalalt NEXT utasitashoz tartozo FOR utasitas 
vegrehajtasakor keriilt a STACK-be. (Az osszetartozast a ciklus- 
valtoz6 cimek osszehasonlitasaval vizsgal ja. ) Ha ilyet nem talal, 
NF - NEXT without FOR, FOR nelkuli NEXT - hibat jelez. 

Ha megtalalja a keresett adatcsomagot, akkor kiemeli azt a 
STACK-b6l f majd az abban talal t adatoknak megfelelden megvaltoz- 
tatja a ciklusvaltozd erteket, es elvegzi a ciklus-veg vizsgala- 
tot. Ha a ciklus mag j at ismetelten vegre kell hajtani f akkor az 
Interpreter visszairja a STACK-be az adatcsomagot, majd megkezdi 
a ciklusmag 1. utasitasanak vegrehajtasat. Ha nem szukseges a 
ciklusmag ismetelt vegrehajtasa, akkor a BASIC program kovetkezo 
utasitasanak ertelmezeset kezdi el. 

Egy ciklus feldolgozasa soran vegrehajtand6 maveletek atte- 
kintese utan a kovetkezokben ismertetjuk a FOR-adatcsomag 
reszletes felepiteset. (Az egyes csomagok szavankent - 1 sz6 = 2 
byte - kerulnek a STACK-be, ezert a leirasban MSB-vel jeloljuk a 
szo ertekesebb 8 bit jet, es LSB-vel a kevesbe ertekes 8 bitet. 
Egy csomag 1. szava helyezkedik el a STACK tetejen, vagyis a 
legkisebb memdria cimen. Az ezt koveto szavak a STACK soronkovet- 
kezd szavaiban - magasabb cimeken - allnak.) 
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FOR-adatcsoaag egesz tipusA ciklusvAltozo eseten 

MSB LSB 





FOR belso k6dja 


CiklusvAltozo RAM cime 


Ciklusviltoz6 ti- 
pusa ( = -1 ) 


Lepeskoz eldjele 










Lepeskoz (egesz tipusii szAm) 


Vegertek (egesz tipusii szam) 


FOR utasitAst tartalmazo sor sorszAma 


Ciklusmag 1. utasitAsAnak RAH cime 



FOR-adatcsoaag egyszerespontos valds ciklusvAltozo eseten 

MSB LSB 





FOR belso kddja 


CiklusvAltoz6 RAM cime 


CiklusvAltoz6 ti- 
pusa ( = 1 ) 


Lepeskoz eldjele 


- Lepeskoz (egyszerespontos valos szam) - 


- Vegertek (egyszerespontos valos szam) - 


FOR utasitast tartalmazo sor sorszAma 


Ciklusmag 1. utasitasAnak RAM cime 
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A bejegyzesekben I4that6 "Lepeskoz elftjele" elnevezesa byte 
erteke rendre a kovetkezo: 

Ha a lepeskoz negativ - -1 (OFFH) 
Ha a lepeskoz pozitiv - 1 
Ha a lepeskoz =0 - 

Mint I4that6, a ciklusv4ltozo tipus4nak fuggvenyeben ket - 
reszben kulonbozd - adatcsomagot hasznal a PRIMO. 

A FOR-adatcsomag ismereteben megerthetd, hogy a PRIMO BASIC 
miert nem engedi meg, hogy a ciklusvaltozd duplapontos valds, 
ill. indexelt v4ltoz6 legyen. 

Duplapontos valis ciklusv4ltozdt azert nem alkalmazhatunk, 
mert ekkor a ciklusvaltoz* vegerteket es a lepeskozt is 
celszerften duplapontos formaban kellene tarolnii ami az 
ismertetett F0R-adatcsomagokt6l elterd - azoknil jelentdsen 
nagyobb STACK-teruletet igenyld - bejegyzest igenyelne. 

Indexelt vAltoz6t ciklusv4ltoz6kent azert nem hasznilhatunk, 
mert a FOR-adatcsomagban a PRIMO BASIC Interpretere eltarol- 
ja a ciklusvAltozd RAM cimet. Ha pedig a ciklusvaltozo egy 
indexelt v4ltoz6 lenne, akkor a ciklus magjinak vegrehajt4sa 
alatt egy ezid4ig meg nem haszn4lt skal4r v4ltoz6 elofordu- 
I4sa az indexelt v4ltoz6k t4bl4j4nak mem6ri4n beluli eltoU- 
s4t eredmenyezne, de a FOR-adatcsomagban lev* ciklusv4ltozo- 
cim ert*ke meg a regi RAM cimre mutatna. Ez vegsd soron azt 
eredmenyezne, hogy a BASIC Interpreter nem tal4ln4 meg az 
indexelt v4ltozok t4bl4j4ban a ciklusv4ltoz6hoz rendelt 
erteket. 

GOSUB-adatcsoiwg felepitese 

Amikor a PRIMO a BASIC program vegrehajt4sa sor4n felismer 
egy GOSUB utasit4st, a STACK-ben egy GOSUB-adatcsomag form4j4ban 
elt4rolja a GOSUB utasitAst tartalmazo BASIC programsor sorsz4m4t 

- az aktu4lis sorsz4mot - es a GOSUB utasit4s RAM cimet. Ezut4n 
megkezdi a kiv4lasztott szubrutin vegrehajt4s4t. 

A szubrutin veget a RETURN utasit4s jelzi. Ekkor a PRIMO 
BASIC Interpretere megkeresi a STACK-ben a GOSUB-adatcsomagot. Ha 
ilyet nem tal4l, R6 - RETURN without GOSUB, GOSUB nelkuli RETURN 

- hib4t jelez. Ha megtal4lja a bejegyzest, akkor az aktu4lis 
sorsz4mot a GOSUB-adatcsomagban tal4lt sors z4mm al teszi egyenl6- 
ve, majd az elt4rolt RAM cimtol kezdodoen a 60SUB-ot koveto BASIC 
utasit4st6l folytatja a program vegrehajt4s4t. 

Egy szubrutin feldolgoz4sa sor4n vegrehajtand6 mftveletek 
4ttekintese ut4n a kovetkezdkben ismertetjuk a GOSUB-csomag 
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reszletes felepiteset. (Az egyes csomagok sz a van ken t - 1 sz6 = 2 
byte - kerulnek a STACK-be, ezert a leirAsban MSB-vel jeloljuk a 
sz6 ertekesebb 8 bit jet, es LSB-vel a kevesbe ertekes 8 bitet. 
Egy csomag 1. szava helyezkedik el a STACK tetejen, vagyis a 
legkisebb memoria cimen. Az ezt koveto szavak a STACK soronkovet- 
kezd szavaiban - magasabb cimeken - Allnak.) 

GOSUB-adatcsoaag 

MSB LSB 



BOSUB belso kodja 



SOSUB utasitAs RAH cime 



BOSUB utasitAst tartalmazd sor sorszAma 



1.6. Kifejezesek feldolgozAsa 

A kifejezesek feldolgozasa a Kifejezes Kiertekeld - a tovAb- 
biakban EXPRN - alprogram feladata. Az EXPRN a BASIC program 
legkulonbozdbb helyein eldfordul6 numerikus es/vagy karakteres 
ki f ejezeseket feldolgozza, majd eredmenyul egyetlen numerikus 
vagy karakteres erteket szolgAltat. Ennek sor An az EXPRN felbont- 
ja a zArdjelezett ki f ejezeseket, es az abban talAlhat6 mavelete- 
ket megfeleld sorrendben vegrehajtva Allitja el6 a kifejezes 
aktuAlis erteket. A kifejezes feldolgozasa kdzben keletkez6 
reszeredmenyeket Atmenetileg a STACK-ben tArolja. A vegeredmenyt 
az EXPRN a Lebegopontos AkkumulAtorba helyezi. 

Annak erdekeben, hogy az ismertetett mAveleteket az EXPRN 
vegre tudja hajtani, vegig kell olvasnia a teljes kifejezest. Ezt 
az adott kifejezes bal oldalArdl indulva kezdi meg. Mindaddig 
halad elore a ki fejezesben, amig egy operAtort nem talAl, vagy el 
nem eri a BASIC utasitAssor veget. Ha elert a sor vegere, befeje- 
zodik a kifejezes feldolgozAsa. Ha egy operAtort talAlt, akkor 
ezt az aktuAlis operAtort es az operAtor bal oldalAn Alio operan- 
dust - az u.n. aktuAlis operandust - osszefuggd egysegnek - u.n. 
csomagnak - tekinti, es vagy elhelyezi a csomagot a STACK-ben, 
vagy az aktuAlis operandus es a STACK tetejen levo csomagban levo 
operandus kozott elvegzi a csomagban tArolt operAciot, majd az 
eredmenyt es az aktuAlis operAtort - mint egy iij csomagot - 
visszahelyezi a STACK-be. EzutAn az EXPRN folytatja a kifejezes 
tovAbbi vizsgAlatAt. 

Egy kifejezes feldolgozAsAnak reszletes menete a kovetkezd: 

1. Az EXPRN beolvassa a kifejezes soronkovetkezo elsd nem 
betftkoz karakteret. Ennek tipusAt6l fuggden kulonfele m&ve- 
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leteket hajt vAgre. 

a. Ha a karakter szAmjegy vagy egy decimAlis pont f feldol- 
gozza a soronkovetkezo numerikus konstanstf es annak 
binAris erteket elhelyezi a lebegopontos akkumulator- 
ban. 

b. Ha a karakter egy idezojel - " -, beolvassa a soronko- 
vetkezd karakteres konstanst, majd annak leirojAt elhe- 
lyezi a Lebegopontos AkkumulAtorban. 

c. Ha a karakter egy beta, beolvassa a kifejezesben soron- 
kovetkezo - skalAr vagy indexett - vAltozot, majd annak 
aktuAlis erteket elhelyezi a Lebegopontos AkkumuUtor- 
ban. 

d. Ha a karakter egy fuggveny tokene - bels6 k6dja -, 
meghatarozza a fuggvenyerteket, majd elhelyezi azt a 
LebegApontos AkkumulAtorban. 



e. 



Ha a karakter egy nyitozAr6jel - ( -» feldolgozza a 
zArdjelben Alio kifejezest, majd annak aktuAlis erteket 
a Lebegopontos AkkumulAtorba tolti. 

f. Ha a karakter egy minusz jel - negativ elojel -, fel- 
dolgozza a soronkovetkez6 kifejezest, es annak aktuAlis 
erteket betolti a Lebegopontos AkkumulAtorba. 

g. Ha a karakter a NOT logikai utasitAs belso k6dja, 
feldolgozza a soronkovetkezo kifejezest, majd a kifeje- 
zes aktuAlis erteke egesz reszenek 1-es komplemenset a 
lebegopontos akkumulAtorba tolti. 

h. Ha a karakter egy plusz jel - pozitiv elojel -, azt 
figyelmen kivul hagyja, mivel a pozitiv el6jel megadA- 
sa, vagy elhagyAsa nem vAltoztatja meg a kifejezes 
erteket. 



1. 



Ha nines mAr tobb karakter - elerte a BASIC utasitAssor 
veget -, MO - Missing Operand, HiAnyzd operandus - 
hibAt jelez. 

(A d,e,f es g esetben a soronkovetkezo kifejezes fel- 
dolgozAsAra djra indul az EXPRN alrutin - rekurziv 
hivAs -. ) 

2. Beolvassa az operandust koveto karaktert. Ha ez egy olyan 
karakter - vagy belso kod - amely kifejezesben nem szerepel- 
het, akkor ezt az EXPRN agy ertelmezi, hogy elerte a kifeje- 
zes veget. Ha ez egy operAtor belso k6dja, akkor azt a 
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tovAbbiakban az EXPRN az aktuAlis operitornak tekinti. Ezu- 
tAn a tovibbi feldolgozAs a 3. ponttil folytatodik. 

3. Ha az EXPRN elert a kifejezes vegere, akkor a 3/b. pont 
alatt leirt tevekenysegeket hajtja vegre. Ha nines meg a 
kifejezes vegen, akkor az aktualis operator tipusAt6l fuggo- 
en a kovetkez6 tevekenysegek valamelyiket hajtja vegre: 

a. Amennyiben az aktualis - az eppen megtalAlt - operator 
az operAtorok vegrehajtAsi sorrendjeben magasabb szin- 
ten ill - vagyis nagyobb a precedenciAja (Id. 1. R£SZ 
1.7.6.) - mint a STACK tetejen lev6 csomag operAtora, 
akkor az EXPRN az aktualis operandust es az aktualis 
operAtort - vagyis a csomagot - elhelyezi a STACK-ben f 
majd a kifejezes tovAbbi feldolgozAsAt az 1. ponttol 
folytatja. (Egy kifejezes feldolgozAsAnak megkezdesekor 
a feltetelezett precedencia erteke = 0, igy barmely 
el6fordulo operator eseten a csomag a STACK-be kerul.) 

b. Ha az aktualis operator vegrehajtAsi szintje - prece- 
denciaja - azonos vagy kisebb, mint a STACK tetejen 
lev6 csomag operAtorAe, ill. az EXPRN elerte a kifeje- 
zes veget, akkor az alprogram kiemeli a STACK-b6l a 
legfelso csomagot, es vegrehajtja a csomagban tarolt 
operator Altai kijelolt mOveletet. (A kiemelese sorAn a 
PRIMO eloszor az adott csomagot ertelmezo rutin R0M- 
cimet olvassa ki a STACK-b6l. A tovAbbi adatok kiolva- 
sAsAt es ertelmezeset mAr a csomagokhoz rendelt kulon- 
bozd rutinok vegzik.) A muvelet 1. operandusa a csomag- 
ban tArolt ertek, 2. operandusa az aktuAlis operandus 
erteke lesz. A keletkezo eredmenyt az EXPRN a tovAbbi - 
akban aktuAlis operandusnak tekinti es a Lebegopontos 
AkkumulAtorban tArolja. (Ha az 1. es 2. operandus elte- 
rt> tipusd, az EXPRN automatikusan vegrehajtja a szukse- 
ges tipuskonverzi6t. Ennek sorAn mindig a kevesebb 
byte-on AbrAzolt operandust alakitja At a mAsik operan- 
dus tipusAra. ) EzutAn a kifejezes kiertekelese a 3. 
ponttdl folytat6dik. Amennyiben az EXPRN a STACK-ben 
nem talAl tovAbbi kiemelheto csomagot, befejezodik a 
kifejezes kiertekelese, az EXPRN visszater a hiv6 prog- 
ramhoz. Az aktuAlis numerikus ertek, vagy a karakteres 
ertek leir6ja a Lebegopontos AkkumulAtorban talAlhat*. 

Az EXPRN m&kddesenek Attekintese utAn a kovetkezo tAblAzat- 
ban felsoroljuk a ki f ejezesekben szerepeltetheto operAtorokat, 
valamint az EXPRN Altai az egyes operAtorokhoz rendelt bels6 
k6dokat es a decimAlis, ill. hexadecimAlis precedence ertekeket. 
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OperAtor Belsd kod Precedencia k6d Megjegyzes 

f 127; 7F A hatvAnyozAs mdveletet 

az EXPRN az aritmetikai 
m&veletektol elkulonitve 
vegzi el, ezert nines 
belso k6dja. 

« 2 124; 7C 

/ 3 124;7C 

+ 121;79 

1 121; 79 125; 7D ha unAris 

) 1 100;64 A logikai operAtorokat az 

= "> 100;64 EXPRN az aritmetikai ope- 

100; 64 rAtoroktdl elkulonitve 

100; 64 dolgozza fel, igy azok 

100; 64 belsd k6dja megegyezhet 

100; 64 az aritmetikai operAtorok 
belso k6djAval. 

90; 5A Az elkulonitett vegrehaj- 
80;50 tAs miatt nines belso 
70; 46 kod. 



Amint mAr emlitettuk, az EXPRN m&kodese sorAn a ki fejezes 
kiertekeles kozbulso eredmenyeit - a csomagokat - a STACK-ben 
tArolja. E csomagok felepitese a bennuk eltArolt operandusok 
tipusAtol - egesz tipusa, egyszerespontos vagy duplapontos val6s» 
karakteres - es az eltArolt operAtortAl fuggoen kulonbozo. A 
kdvetkezokben ismertetjuk valamennyi lehetseges csomag 
felepiteset. (Az egyes csomagok szavankent - 1 szo = 2 byte - 
kerulnek a STACK-be, ezert a leirAsban MSB-vel jeloljuk a sz6 
ertekesebb 8 bit jet, es LSB-vel a kevesbe ertekes 8 bitet. Egy 
csomag 1. szava helyezkedik el a STACK tetejen, vagyis a legki- 
sebb memoria cimen. Az ezt koveto szavak a STACK soronkovetkezo 
szavaiban - magasabb cimeken - Allnak. A csomagokban lev6 "Foly- 
tatAs ROM cime" elnevezesft sz6 az EXPRN a I program azon reszenek 
ROM cimet tArolja, amely a ki fejezes feldolgozAsAnak 1. pontban 
leirt tevekenyseget hajt ja vegre. ) 



>= 1 => 


3 


< 


4 


<> 1 >< 


5 


<= 1 =< 


6 


NOT 





AND 


— 


OR 


— 
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"Aritaetikai operator" csonag 

MSB 



LSB 



El6z6 operAtor 
precedenciAja 




FolytatAs ROM cime 


Egesz tipusii, egyszerespontos vagy 
duplapontos valos adat (1,2»4*2 byte) 


Adat tipusa 


Operator k6dja 


Aritmetikai mftveletvegzd rutin ROM cime 



"Hatvanyozas" csoaag 



MSB 


LSB 


El6z6 operator 
precedenciAja 




, Folytatis ROM cime 


Egyszerespontos valos adat (2»2 byte) 


HatvAnyozAst vegz6 rutin ROM cime 



"Logikai operator" csonag 



MSB 


LSB 


El6z6 operator 
precedenciaja 




FolytatAs ROM cime 


Eg6sz tipusii adat (1*2 byte) 


Logikai mftveletvegzo rutin ROM cime 
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'RelAcio karakteres adattal" csomag 

MSB 



Elozd operator 
precedenciAja 



Re I Ac i 6s operA- 
tor belsd k6dja 



LSB 



FolytatAs ROM cime 



Karakter leir6 cime 



Karakteres reLAciA rutin ROM cime 



"Relacid numerikus adattal" csomag 

MSB 



LSB 



Elozo operAtor 
precedenciAja 





Re I acids operA- 
tor bels6 k6dja 




Folytatis ROM cirne 


Egesz tipusft, egyszerespontos vagy 
duplapontos valos adat (1,2,4*2 byte) 


Adat tipusa 


Operator k6dja 


Numerikus relAcio rutin ROM cime 



1.7. Teruletfoglalas gepi kodft rutinok szanara 

A PRIMO lehetove teszi, hogy a FelhasznAl* BASIC programjA- 
b6l sajAt gepi kodii rutinokat inditson (Id. CALL fuggveny). Ez a 
lehetdseg biztonsAgosan azonban csak akkor alkalmazhat6» ha a 
gepi rutinok szAmAra a memoriAban olyan teriiletet tudunk biztosi- 
tani, amelyet a BASIC program m&kodese sorAn - ellenorizetleniil - 
nem tud felulirni. A kovetkezokben bemutatjuk, hogy a PRIMO-ban 
hogyan lehet ilyen teruleteket letrehozni. 

Gepi k6dii programunkat elvileg hArom kulonbozo teruleten 
helyezhetjuk el. A kovetkezokben ismertetjuk a kuldnfele megoldA- 
sok eldnyeit, ill. hAtrAnyait. 
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a. BASIC vAltozoban. 

E megoldAs el6nye, hogy a teruletfoglalAs a BASIC program 
futAsa alatt hajthato vegre. Ha skalAr vAltozbt hasznAlunk, 
akkor egy egesz tipusu vAltoz6ban 2, egyszerespontos vat6s 
vAltozoban 4, duplapontos val6s vAltoz6ban 8 byte hosszdsAgii 
gepi k6dot helyezhetunk el. (Karakteres vAltoz6t gepi k6d 
tArolAsAra ne hasznAl junk. ) Ebbol lAthato, hogy skalAr 
vAltoz6k alkalmazAsa eseten csak igen kismereta gepi program 
futtathat6. Ezen a problemAn ligy segithetunk, hogy a gepi 
k6dokat egy rnegfeleld meretre dimenzionAlt vektorban helyez- 
zuk el. (A vektor tetszoleges numerikus tipusu lehet, karak- 
ter-vektort gepi k6d tArolAsAra ne hasznal junk. ) Ekkor arra 
kell ugyelnunk, hogy a vektor mem6riacimenek meghatArozAsAt 
vegzo VARPTR fuggveny alkalmazasa utan a programban korAbban 
meg nem hasznAl t skalAr vAltoz6 elofordulasa a tombvAltozok 
cimet - igy a gepi kodot orz6 vektor cimet is - megvAltoz- 
tatja. Ezt a problemAt tlgy szuntethet juk meg, hogy a BASIC 
programunk elejen egy fiktiv ertekadAsban feltuntetjuk mind- 
azon skalAr vAltozokat, amelyeket a BASIC programban hasz- 
nAlni kivAnunk. 

Ha gepi k6dunkat BASIC vAltoz6ban tAroljuk, feltetlenul 
figyelembe kell vennunk azt, hogy a BASIC program mddositA- 
sAnak hatAsAra - torles, beszurAs - a k6dokat tArolo vAltoz6 
mem6riacime m6dosul. Ezert igy csak olyan gepi k6dokat he- 
lyezhetiink el, amelyekben nines abszoliit cim. (Ez azt jelen- 
ti, hogy a gepi kodii programban csak relativ vezerlesAtado 
utasitAsokat alkalmazhatunk, ha a vezerlesAtadAs a sajAt 
rutinunk egy kivAlasztott pontjAra irAnyul. Termeszetesen 
szerepelhet a gepi kodban abszoliit cim is, ha az pi. egy 
ROH-ban elhelyezked6 szubrutin cime, vagy valamelyik rend- 
szervAltoz6 RAM cime. Meg va 1 6s it hat 6 az is, hogy a gepi k6du 
program relokAlAsAt maga a BASIC program hajtsa vegre.) 

b. A »agn6 puffer es a BASIC programterulet kozott. 

Ha a gepi k6du programot a magn6 puffer es a BASIC program- 
terulet kozott kivAnjuk elhelyezni (Isd. memoria felosztAs, 
F-27 oldal), akkor tudomAsul kell vennunk, hogy ezt az elhe- 
lyezend6 gepi rutinokat felhasznAlA BASIC program nem tudja 
megtenni. Ezert ez a megoldAs csak ugy alkalmazhat6, hogy a 
teruletfoglalAshoz szukseges utasitAsokat parancs - direkt - 
modban adjuk meg, vagy egy a teruletfoglalAst vegrehajt6 
BASIC programot futtatunk, majd a szukseges terulet biztosi- 
tAsa utAn a PRIMO mem6riAjAba betoltott BASIC, vagy gepi ko- 
dii program mAr elhelyezheti rutinjait a lefoglalt teruleten. 



E me_ 
terulet 



goldAs elonye viszont az, hogy a lefoglalt mem6ria 
et kezdocime mindig a 17386;43EA Lesz, igy abszoliit 
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cimeket, pi. sajat szubrutinokat tartalmaz6 gepi kodti prog- 
ramed is alkalmazhatunk. 

Az igenyelt terulet lefoglalasat vegrehajt6 BASIC utasitas- 
sorozat - reszletesebb magyarazat nelkul - a kovetkezo: 

POKE 16548, 17386+X-256*INT( ( 17386+X)/256> , INK ( 173B6+X)/256> 

POKE 17385+X,0 

NEW 

• Az utasitasokban szereplo X az igenyelt terulet byte-okban 
megadott meretet jeloli. 

Annak erdekeben, hogy a terulet foglalast a BASIC Interpreter 
tudomasul vegye, a NEU parancsot kell alkalmazni. Ez teszi 
lehetetlenne, hogy egy BASIC program sajat maga szamara a 
memoria elejen teruletet biztositson, hiszen a sziikseges 
m&veletek elvegzese utan - az erdemi tevekenyseg megkezdese 
elott - kitorli magat a PRIMO mern6riijab6l. 

c. A karaktervaltozo terulet es a Kepernyo RAM kozott. 

Ha a gepi k6dii programok/valtozok szamara a Kepernyo RAM 
el6tt akarunk memoria teruletet foglalni, akkor azt a fut6 
BASIC program segitsegevel is megtehetjuk. Tgy pi. lehetse- 
ges, hogy egy magn6rol betoltott program, elinditasa utan 
gepi rutinjainak maga foglalja le a sziikseges teruletet. 
Ezutan mar a megfelelfi kAdok POKE utasitasokkal az elkuldni- 
tett teruletre elhelyezhet6k. 

Mivel a kulonfele memdria rnerelft - A-32, A-48, A-64 - gepek- 
ben a Kepernyo RAM terulet kezd6cime mas es mAs, ezert a 
lefoglalt terulet kezdGcime is fuggeni fog azon PRIMO 
tipusat6l, amelyben a terulet foglalast vegrehajt juk. Ezert 
az elkulonitett teruletre elhelyezendfl gepi k6d - hasonl6an 
az a. pontban leirtakhoz - csak megkotesekkel tartalmazhat 
abszolut mem6ria cimeket. 

A teruletfoglalast a kovetkezo BASIC utasitasokkal valosit- 
hatjuk meg: (A programreszletben szerepl6 X az igenyelt 
terulet byte-okban megadott meretet jeloli.) 



100 CIM=256*PEEK( 16562 )+PEEK< 16561 >-X 

110 POKE 16561, CIM-256*INT(CIM/256),INT(CIM/256) 

120 CLEAR 50 

130 CIM=256*PEEK( 16562)+PEEK( 16561 ) 
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Az eldbbi programreszletet celszerfli a BASIC program elejere 
irni, mivel a 120-as cimkejd sorban szereplo CLEAR utasitas 
valamennyi valtoz6 6rteket torli. Ugyancsak a CLEAR utasitas 
miafct a fenti programreszlet nem lehet egy ciklus magjaban, 
ill. szubrutinban (Id. 1. R£SZ 2.2. pontban a CLEAR utasitas 
reszletes ismerteteset. ) . Ha a BASIC programban a karakteres 
valtoz6k szamara tobb, mint 50 byte szuks&ges, akkor term£- 
szetesen a CLEAR operandusa ertelemszer&en megvaltoztathat6. 
A BASIC program tovabbi r£szeben a lefoglalt terulet kezdo- 
cimet a CIM nevfli valtoz6 tarolja. Az ismertetett okokbol a 
kulonfele tipusCi - A-32, A-48, A-64 - PRIMO-knal a CIM 
valtoz6 erteke kulonbozd lesz. Hogy ezt elkeruljuk, a prog- 
ramreszlet 100-as sorszamu sorat - a rendelkezesre 4116 
mem6ria minimal is meretenek figyelembe vetelevel - megval- 
toztathatjuk. Ha pi. a 

100 CIM=25624 

BASIC sort alkalmazzuk, akkor a lefoglalt terulet kezdocime 
25624 lesz, rnig merete A-32 tipus eseten 1000, A-48-asnal 
17384, A-64-esnel 33768 byte lesz. 

Annak erdekeben, hogy egy magn6r6l betoltott es elinditott 
program egyszeraen meg tudja hatarozni a kiepitett memoria 
meretet, a ROM 20-as cimfli byte-jAnak Arteke elterd a kulon- 
boz6 tipusa PRIMO-knal. Az emlitett cim tartalma rendre a 
kovetkezo: 

PRIMO A-32 - 104 
A-48 - 168 

A-64 - 232 
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2. FEJEZET 



A PRIM) aritnetikai rutinjai 



Ebben a fejezetben osszefoglal juk a PRIMO aritmetika rutin- 
jainak felhasznAlAsAhoz szukseges alapveto ismereteket. Bemutat- 
juk az alkalmazott szAmAbrAzolAsi mddokat, megadjuk az aritmeti- 
kai rutinok munkaregisztereinek pontos ertelmezeset. Ismertetjuk 
az alaproftveleteket es fuggvenyeket vegrehajt6 alprogramok belepe- 
5i cimeit, parametereit. (A megadott RAM- es ROM-cimek a PRIMO 
'84. 1 verziAjAra vonatkoznak. Az ertekek a PRIMO tovAbbfejleszte- 
sekor megvAltozhatnak. ) 



2.1. A PRIMO szaaAbrazolasi fornatumai 

A PRIMO aritmetikai programcsomagja ket, alapvetden kulonbo- 
z6 tipusii szAmAbrAzolAssal rendelkezik. A kovetkezokben e ket 
AbrAzolAsi mid reszletes leirAsAn tulmenoen konkret peldAkon 
keresztut igyekszunk bemutatni a szAmok konverzibjAt es 
AbrAzolAsAt . 

Egesz tipusa szaaabrazolas 

Az egesz tipusa szAmAbrAzolAs a fixpontos AbrAzolAsi m6d 
speciAlis esete. Ennel az AbrAzolAsi modnAl ugyanis a tizedespont 
- vagy binAris pont - a szAm AbrAzolAsAra lefoglalt terulet jobb 
szelen helyezkedik el. Ebbdl kovetkezik f hogy az ilym6don 
AbrAzolt szamok tortreszt nem tartalmazhatnak. Az AbrAzolAsi 
tartomAnyt, vagyis a pozitiv es negativ tartomAnyban AbrAzolhato 
maximAlis ertek nagysAgAt a szAm tArolAsAra felhasznAlt terulet 
hossza - azaz a bitek szAma - hatArozza meg. 

A PRIMO eseteben az egesz tipusil szAm tArolAsAra ket Byte 
szolgAl. Mivel az AbrAzolAs ilgynevezett kettes komplemens kodu f 
ezert a szAmAbrAzolAs ertektarto«Anya: 

-32768 ... +32767 

Az egesz tipusa szAraokat a PRIMO a kovetkezo formAban AbrAzolja: 



2 15 2 14 2 13 2 2 2 1 2° 



t 

Eldjelet jelkepezo bit 
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A kettes komplernens k6dii AbrAzolAs azt jelenti T hogy pozitiv 
szArn eseten a szim abszoliit erteket ki fejezo binAris szAmjegyek 
ugy toltik ki a bitpozici6kat, mintha a kepzeletbeli binAris pont 
az AbrAzolAsra fenntartott bitpoziciuk utAn kovetkezne. A binaris 
szaffi ertekes jegyeit megelozd osszes poziciuba nulla kerul . Igy 
automat ikusan a 15. - az elojelet AbrAzolo - pozicidn is nulla 
fog szerepelni, arnely ennel az AbrAzolAsi m6dnA( megegyezes sze- 
rint a pozitiv elojelet jelenti. A legnagyobb AbrAzolhatd pozitiv 
szAin ezek szerint: 

111111111111111= 2 15 -1 = 32767 

Negativ szArn tarolasa eseten els6 lepeskent a szAm abszoliit 
erteket* mint egy pozitiv szAmot az elobb leirtak szerint AbrA- 
zoljuk. Ezutan a pozitiv szamot bitenkent invertAljuk* vagyis 
minden pozicioban az ott levo bit erteket az el lenkezojere v4l~ 
toztatjuk. Legvegul a reszeredmenyhez a legalacsonyabb helyierte- 
ken 1-et hozzAadunk, es igy megkapjuk az eredeti szArn ugynevezett 
kettesn komplernens k6du megfeleldjet. Ha az AbrAzolAst helyesen 
vegezzuk, akkor a legmagasabb helyierteken - a 15. pozicidn - egy 
1 ertekO. bit jelzi az AbrAzolt egesz tipusu szArn negativ eloje- 
let. Ezt a leirt algoritmus minden esetben biztositja, tehAt 
kulon nem kell az elojel beAl litAsAval torftdni. A legnagyobb 
AbrAzolhatd negativ szam: 

10 =-2 lu = -32768 

Ha egy kettes komplernens kodban AbrAzolt szamot ertelmezni 
akarunki akkor a binaris alak 15. bitpoziciojAban levo ertek 
egyreszt megadja a szam eldjelet f mAsreszt megszabja a visszaala- 
kitas nod j at is. Amennyiben az elojel pozicidban nulla szerepeli 
akkor a szam pozitiv, es a visszaalakitAs soran a poziciokhoz 
rendelt helyiert£kek Altai jelkepezett 2 hatvanyok osszeadAsAval 
kell a szam decimAlis erteket meghatArozni. Ha a legmagasabb 
helyierteken levo bit ert£ke 1, akkor a decimAlis konverzio 
teljesen hasonlo mddon tortenik mint az AbrAzolAs, vagyis eldszor 
invertAlni kell minden egyes pozicio tartalmAt» majd a reszered- 
menyhez 1-et hozzA kell adni. Az igy kapott szAm mAr pozitiv 
szAmkent - az ott leirtak alapjAn - alakithato vissza. 

Az egesz tipusu, eldjeles szAmok kettes komplernens k6dban 
tortend AbrAzolAsAnak eldnye, hogy igy minden mavelet visszave- 
zethet6 az eldjelbittel egyutt elvegzett osszeadAsra, illetve 
kivonAsra. Aritmetikai muveletvegzes - osszeadAs, kivonAs - 
kozben az eldjelbit nem igenyel kulon feldolgozAst f ugyandgy kell 
kezelni mint az utAna kovetkezo 15 bitet. A muveletvegzes sorAn 
az eldjelbit automatikusan a helyes ertekre All be. Csak az 
eredmeny ertelmezesekor kell a legertekesebb bitpozicidn Alio 
elojelbitet kulon kezelni. 
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Pel dak az egesz tipusd szanabrazolasra: 

1. Abrazoljuk a +2511 Q -et. 

251 1 10 = 10011 1001 ill 

Az atalakitott szamot a szamibrazolasi hosszra - 16 bit - 
ki egesz it ve az eredmeny: 

0000100111001111 

2. Abrazoljuk a -7936. -at. 

7936 = 1111100000000 2 
Az ibrizolisi hosszra k i egesz it ve: 

0001 1 1 1 100000000 
A bitenkenti invertilist elvegezve: 

1110000011111111 

A reszeredmenyhez l~et hozzaadva megkapjuk a helyes ered- 
meny t : 

1 1 10000100000000 

3. Alakitsuk vissza decimilissi a kovetkezo, egesz tipusCi 
szamibrazolasi moddal abrazolt biniris szamot. 

000110 1011101010 

Mivel a 15. pozicion lev6 elojelbit nulla, ezert - I even 
pozitiv szim - kozvetlenul f el irhat juk a szamot a megfelelo 
helyiertekekhez tartoz6 2 hatvanyok osszegekent: 

2 1Z + 2 11 + 2* + 2 / + 2 b + 2 J + 2" + 2 = &B90 1Q 

4. Alakitsunk vissza decimal is szimmi egy masik, kettes komple- 
mens k6dban abrazolt szamot. 

1111101010100010 
Mivel az elojelbit 1, ezert a szam negativ lesz. 
Els6 lepesben vegezzuk el a bitenkenti invertilist. 

0000010101011101 
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Adjunk hozzA a szAmhoz 1-et. 

10 10 10 11110 

Trjuk fel a szAmot az egyes hetyiertekekhez tartozo 2 hatvA- 
nyok osszegekent: 

2 10 + 2 8 * 2 6 + 2 4 + 2 3 + 2 2 + 2 1 = 1374^ 

Az elojel figyelembevetetevel a heiyes eredmeny: -1374 

VaL6s tipusa szAnAbrAzolAs 

Az egesz tipusii tArolAsi mod ket jelentos hitranyat - az 
arinylag szuk AbrAzolAsi tartomAnyt es a tortresz hiAnyAt - a 
vat 6s tipusii. szAmabrAzolAs kuszoboli ki . A valos tipusii tArolAsi 
mdd lehetoseget biztosit bArmilyen tortszAm bizonyos pontossAggal 
torteno AbrAzolAsAra. 

Az AbrAzolAs alapgondolata, hogy bArmely szAm felirhato u.n. 
exponenciAlis alakban, azaz egy egyiitthato es egy hatvAny szorza- 
takent. 

A = M * 10 K 

ahol: A - tetszes szerinti szam 

M - egyutthat6 u.n. Mantissza 

K - a hatvany Kitevoje, u.n. Karakterisztika 

Az igy felirt szAmot normal alakra hozva - vagyis ligy Atala- 
kitva, hogy a Mantissza csak tortreszt tartalmaz es a tortresz 
els6 nullAtol kulonbozo szAmjegye kozvetlenul a tizedespont 
mogott all - u.n. normal izAlt szamot kapunk. Ebbol a f el irAsi 
m6dbol nyilvAnvalban adodik, hogy val6s szAmAbrAzolAsi modban ket 
erteket kell tarolni, a MantisszAt es a KarakterisztikAt. A 
hatvAny alapjAt, azaz a szAmrendszer alapszAmAt nem kell tArolni, 
hiszen az konstans. Mivel a szAmitogep binAris AbrAzolAsi rend- 
szerehez kozelebb Allnak kettu hatvAnyai mint a tize, ezert a 
szAmrendszer, es igy az AbrAzolAs alapjAul AltalAban kettot vagy 
tizenhatot szoktak vAlasztani. 

A val6s tipusu szAmAbrAzolAsnAl egy szAm tArolAsAra szolgAl6 
teruletet meg kell osztani a Mantissza es a Karakterisztika 
kozott. A Mantisszabitek szAmAnak novelesevel az AbrAzolAs pon- 
tossAga novelheto, a Karakterisztika bitszAmAnak novelese a leg- 
nagyobb AbrAzolhat6 szAm ertekenek noveleset eredmenyezi. A PRIMO 
eseteben ket kuli5nbozo valos tipusu szAmAbrAzolAsrol beszelhe- 
tunk. E ket kulonbozo forma c sup An a Mantisszabitek szAmAban ter 
el. A kulonbseg az AbrAzolAs pontossAgAban jelentkezik. Az egy- 
szerespontos m6d eseteben a Mantissza tArolAsAra 24 bit szolgAl» 
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ezzel 7 dec i mil is szAmJegy pontossAg erheto el. Duplapontos 
midban a PRIMO 56 biten tarolja a MantisszAt. Ez 17 decimAlis 
szAmjegy pontossAgot eredmenyez. A Karakterisztika* ill. a Man- 
tissza elojelenek AbrAzolAsa mindket m6d eseten azonos. 

Valos tipusft egyszerespontos AbrAzolAsi forma 



Karakterisztika 



Elojel es Mantissza 



< 1 Byte m 3 Byte 

valos tipusd duplapontos AbrAzolAsi forma 



Karakterisztika 



El 6 j el es Mantissza 



< 1 Byte -- »< 7 Byte ■* 

A Mantissza abrazolasa 

A Mantissza tArolAsAra 24 f ill. 56 bit ill rendelkezesre. A 
szAm binAris formAra torteno AtalakitAsa utan a PRIMO a reszered- 
menyt 2-es a lap on normalizal ja. Ennek sorAn a binaris pontot a 
Mantissza balrol haladva elsd 1-et tartalmazo bitje ele helyezi. 
Ezzel egy i dob en - a binaris pont egy bittel torteno elmozgatasa- 
kor - a Karakterisztika erteke modosul. A binaris pont jobbra 
mozditasakor a Karakterisztika erteke eggyel csokken* balra 
lepteteskor a Karakterisztika erteke eggyel novekszik. Az igy 
kapott normalizAlt szAm a Mantissza tArolAsAra fenntartott teru- 
let legertekesebb helyierteken biztosan 1-et tartalmaz. Mivel egy 
lebegopontos szAmot a PRIMO mindig normal izAl tan tarolj ezert a 
Mantissza legertekesebb bitjet - ami mindig 1-et tartalmazna - a 
tarolt szam elojelenek AbrAzolAsAra hasznAljuk f el . Termeszetesen 
a szAm feldolgozAsakor figyelembe kell venni, hogy a legerteke- 
sebb Mantissza biten az elojel all. Tgy az AbrAzolAsi pontossAg - 
vAltozatlan Mantissza bitszAm mellett is novelheto. Megegyezes 
szerint a legertekesebb Mantissza bit O-As erteke pozitiv szAmot? 
1-es erteke negativ szAmot jelkepez. 

A Mantissza ertekenek rneghatArozAsakor - a konverzi6 sorAn - 
a legkisebb AbrAzolAsi hiba erdekeben a PRIMO esetenkent a 
szAmitott Mantissza erteket kerekitve tArolja. 

A Karakterisztika abrazolasa 

A normalizAlAs sorAn kapott Karakterisztika ertek u.n. alap- 
ertekes AbrAzolAsi mod on kerul tArolAsra. SzokAs ezt a m6dszert 
128 tobbletes Kitevo AbrAzolAsnak is nevezni. E mddszer lenyege* 
hogy a Kitevo val6di erteket az alapertekkel m6dositva tAroljuk. 
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A 8 biten AbrAzolhat6 0. ..255 kulonfele lehetseges szAmerteket 
felez6 128. illapotot onkenyesen 0-nak - alaperteknek - vAlaszt- 
juk. Tarolaskor a KitevA elojeLes valddi erteket az atapertekhez 
hozzaadva kapjuk a modositott Kitevit. A Karakterisztika eJAteLfei 
pozitivnak tekintjuk, ha erteke naqyobb v aq y eqyenl6 t mint 128 £s 
negativnak, ha a Karakterisztika erteke 128-nAl kisebb. Ezzel a 
m6dszerrel 

,-127 .H27 1ft -3B ir +3Q 
2 ...2 » azaz 10 ...10 

nagysAgrendG szAmok AbrAzolhatok. Ha a tArolandd szam 10 " -nil 
kisebb, akkor a PRIMO - a Mantissza erteket figyelrnen kivul 
hagyva - Karakterisztikakent O-At tarol, vaqyis a Karakteriszti- 
kAjAban erte ket hordoz6 szamot u.n. qepi nu llanak tekinti. 

Az egyszerespontos es duptapontos val6s szAmAbrAzolAs kozott 
csupAn a Mantissza hosszAban - ezzel az AbrAzolAsi pontossAgban - 
van kulonbseg. A Karakterisztika kepzese, tArolAsa, es igy az 
AbrAzolhati szAmok nagysAgrendje mindket midnAl megegyezik. 

PeldAk valos tipusti sza«abrazolasra 

1. AbrAzoljuk egyszerespontos val6s modban a kovetkezA szAmot: 

753 10 = 10U110001 2 
0.17 = 0. 0010101 uooooi 2 
753.17 = 101 11 10001.0010101 1100001 2 

normal izAlAs utAn az eredmeny: 

0. 10111100010010101 110000U * 2 
az elojel beAUltAsa utAn a Mantissza vegleges erteke: 

001 1 1 100010010101 1 100001 
a Karakterisztika erteke: 

128+10 - 138 10 = 10001010 2 

a teljes eredmeny: 

10001010 00111100 01001010 11100001 
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2. AbrAzoljuk egyszerespontos val6s modban a kovetkezo szAmot: 

-13728.65 
13728, x = 1001 10 1000 10000 o 

0.65« rt = 0.10 1001 100U 

10 *■ 

13728. 65, rt = 1000110100010000.1010011001^ 
10 ^ 

normal iz Alas utAn az eredmeny: 

0.1001 10100010000101001 1001 2 * 2 15 

Az elojel negativ, ezert a Mantissza legertekesebb bitpozi- 
ci6jAban Alio ertek 1 raarad. Mivel a mantisszAt 24 biten 
AbrAzoljuk es az els6 elmarado bit erteke 1, ezert a man- 
tisszAt felfele kerekitjuk. A Mantissza vegleges erteke: 

100110100010000101001101 
a Karakterisztika erteke: 

128+15 = 143 1Q = 10001 111 2 
a teljes eredmeny: 

10001111 10011010 00100001 01001101 
3. AbrAzoljuk duplapontos val6s modban a kovetkez6 szAmot: 

0.005715 1Q 

0.005715 = 0.0000000101110110100010011100101000011000 
1 101111010110011000100111 2 

normal izAl As utAn az eredmeny: 

0.1011 101 1010001001 1 10010100001 100 _ 7 
0101 11 10101 1001 10001001 u 2 * 2 

az el6jel beAllitAsa es a szukseges kerekites vegrehajtAsa 
utAn a Mantissza vegleges erteke: 

00111011 01000100 11100101 00001100 01011110 
10110011 00010100 

a Karakterisztika erteke: 

12B+(-7) = 121 1Q = 01111001 2 
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4. 



a teljes eredmfcny: 

01111001 00111011 01000100 11100101 
00001100 01011110 10110011 00010100 

Abrazoljuk duptapontos valds m6dban a kovetkezo szamot: 

0.1 
0.1 = 0.0001100110011001100. .. (vegtelen hosszii) 



normal izAl As utAn az eredmeny: 

0. 110011001100 



■2 



* 2 



az elojel beAUitAsa es a szukseges kerekifces vegrehajtAsa 
utAn a Mantissza vigleges erteke: 

01001100 11001100 11001100 11001100 11001100 
11001100 11001101 



a Karakterisztika ert£ke: 

128+(-3) = 125 
a teljes eredmeny: 



= 01111101 2 



01111101 01001100 11001100 11001100 
11001100 11001100 11001100 11001101 

2.2. Az aritaetika munkaregiszterei 

A kovet kezAkben ismertetjdk az aritmetika munkaregisztereit. 
Megadjuk az egyes vAltoz6k ertelmezeset, valamint decimAlis es 
hexadecimAlis cimeiket. 



Lebegdpontos 
Akku. #1 



Lebeg6pontos 
Akku. #2 



Eg£sz Egyszeres Dupla 



16669;411D 
1G670|411E 
16671;411F 
16672; 4120 
16673? 4121 
16674; 4122 
16675; 4123 
16676; 4124 



16679; 4127 








LSB 


16680; 4128 








NMSB 


16681; 4129 








NMSB 


16682; 412A 








NMSB 


16683; 4 12B 


LSB 


LSB 


NMSB 


16684; 412C 


MSB 


NMSB 


NMSB 


16685; 4 12D 





MSB 


MSB 


16686; 41 2E 





EXP 


EXP 
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EXP - Karakterisztika 

MSB - Mantissza legertekesebb bitjet tartalmazo Byte 

NMSB - Mantissza soronkovetkezo Byte 

LSB - Mantissza legkevesbe ertekes bitjet tartalmaz6 Byte 

A fenti tAblAzat az aritmetika ket legfontosabb munkavAlto- 
zdjAnak mem6riAn beluli elhelyezkedeset mutatja. Az aritmetika 
Altai vegrehajtott m&veletek kulonbozo tipusii - egesz, egyszeres- 
pontos, ill. duplapontos valos - eredmenye a Lebegopontos Akkumu- 
litor #l-ben keletkezik. A keletkezett eredmeny tipusAra jellernzo 
kid a 16559;40AF cimfli vAltoz6ban talAlhat6. A tipusok es az 
azokat azonosit6 kddok a kovetkezik: 

egesz tipusii ertek = 2 

karakteres ertek = 3 

egyszerespontos ertek = 4 

duplapontos ertek = 8 

Az aritmetika a Lebeg6pontos -» Karakteres konverzid szAmAra 
rendelkezik egy 26 Byte meretfl. munkaterulettel . A terulet kezdo- 
cime 166B8;4130. Ez az a teriilet f ahovA a konvertAl6 rutin az 
Atalakitott binAris ertek karakteres megfelelojet - a szAmot 
jelkepezo karaktersorozatot - helyezi el. 

2.3. A Karakteres «--» BinAris konverzid rutinjai 

A kovetkezokben ismertetjuk a PRIMO aritmetika azon rutinja- 
it, amelyek a 2.1. fejezetben leirt Karakteres decimAlis -» BinA- 
ris, ill. BinAris -» Karakteres decimAlis konverzidkat elvegzik. 

Karakteres decimAlis erteknek a rnemdriAban elhelyezkedfi azon 
karaktersorozatot - stringet - nevezzuk, amely egy egesz, tort 
vagy exponenciAlis alakban megadott decimAlis szAm el6jelet, 
szAmjegyeit, tizedes pontjAt es Kitevdjet tartalmazza. 

Karakteres deciaAlis ■* BinAris konverzi6s rutinok 

A konverzi6s rutinok a HL reaiszterpAr tartal ma Altai meq- 
cimzett j e mdria terul efcerL elhelyezkedo strin fle_t. decimAlis szAmnak 
ertelmezik, es eredmenyul - kuldnfele szAmAbrAzolAsi mddban - 
annak BinAris megfeleldjet szolgAltat jAk. 

Karakteres -» Egesz tipusii konverzid Belepesi cim: 07770; 1E5A 

Egesz tipusii konverzios rutin. Az eredmenykent keletkezd 
egesz tipusii ertek a rutinbdl vald visszatereskor a DE 
regiszterpArban talAlhato. HL Q2 <S.i S.6 Wq VQ W td V ciwict 

keU i^o^ tavfal wiq^^a. £ Lo^el HelWu U kov/ivev^iot 



11-37 



A PRIMO SZAMTOGfeP MOKODfeSE 



Karak teres -* Binaris konverzid Belepesi cim: 03692; 0E6C 

Ha az italakitandfi string nem tartalmaz tizedespontot, ill. 
Kitevfit, es a keletkezfi szam erteke a -32768. . .32767 inter- 
val lumba esik, akkor eredmenyul egy egesz tipusii. szimot 
kapunk. Amennyiben az elfibbi feltetelek nem teljesiilnek, 
akkor az eredmeny egyszerespontos valfis szam lesz. Ha a 
karaktersorozatban all* szim egeszreszeben levfi szimjegyek 
szana tobb mint 7, ill. a Kitevfiben duplapontos Karakterisz- 
tika - D - ill» akkor duplapontos valos szim keletkezik. Az 
eredmeny minden esetben a Lebegfipontos Akkumulitor #l-ben 
talilhato. A keletkezett eredmeny tipusa a 16559; 40AF cimen 
levfi munkaviltozfiban talalhato. 

Karakteres ■* Duplapontos konverzifi Belepesi cim: 03685;0E65 

Duplapontos val6s konverzifis rutin. Az eredmenykent keletke- 
zfi duplapontos valos ertek a rutinbol tortenfi visszatereskor 
a Lebegfipontos Akkumulitor #l~ben talilhatfi. 

Binaris -» Karakteres decimal is konverzifis rutinok 

Az alabbi rutinok az eredmenyul szolgaltatott Karakteres 
decimilis erteket a 16688;4130 cimen kezdfidfi munkateruletre, ill. 
az Egesz tipusu -* Karakteres konverzi6s rutin eseteben a hivisko- 
ri HL regiszterpar iltal megcimzett teruletre taroljik. 

Egesz tipusu -» Karakteres konverzid Belepesi cim: 04911;132F 

A Lebegfipontos Akkumulitor #l-ben tarolt szamerteket a HL 
regiszterpar altal kijelolt mem6riacimre konvertilja. 

Binaris •♦ Karakteres konverzio Belepesi cim: 04029; OFBD 

A Lebegfipontos Akkumulitor #l-ben tirolt, tetszfileges tipusu 
biniris szimot Karakteres decimilis ertekke alakitja, majd 
az eredmeny stringet a 16688; 4130 cimen kezdfidfi munkateru- 
letre tirolja. it h eL'//«;k. 

BinAris -» Karakteres konverzio Belepesi cim: 04030; OFBE 

forMitua aegadassal 

M&kodese megegyezik az elfibbiekben leirt rutinnal, de lehe- 
tfiseg van a keletkezfi eredmeny string formituminak meghati- 
rozisira. A formitumot meghatirozfi parametereket a rutin 
meghivisakor az A, B es C regiszterekben kel I megadni. Az 
egyes regiszterek jelentese a kfivetkezfi: 
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A regiszter: 

Bit7 = O f Nines szukseg a formAzAsra 

Bit6 = l f Minden, a tizedes ponttol balra haladva 3. szAm- 

jegy elott Alljon egy vesszo 
Bit5 = If A szAm elotti kihasznAlatlan szAmjegypozici6kon * 

karakterek Alljanak 
Bit4 = If A szAm elejen jelenjek meg egy S karakter 
Bit3 = If Jelenjen meg a pozitiv elojel is 
Bit'2 = If az eldjel a szim utan jelenjen meg 
Bitl = Fenntartva 
BitO = If A szam fellogaritmikus alakban jelenjen meg 

B regiszter: 

trteke a decimAlis pont bal oldalAn Alld szAmjegyek szAmAt 
hatArozza meg. cut -eXo^A^ i^» bg)£ Well koJ.l<u| d.Cuu\ 

C regiszter: . 2*«aj#*C^d 



ferteke a decimal is pontot koveto szamjegyek szAmAt hatArozza *<2-L o 
meg. Ha a szAm a megadott erteknel tobb tizedesjegyet tar- 
talmazi a PRIHO a szAmot a megadott szAmjegyre kerekiti. 

2.4. Aritaetikai aaveletek rutinjai 

Ezen fejezetben megadjuk az. aritmetika egyes rutinjainak 
felhasznAlAsAhoz szukseges parameter ek ertelmezeset. A rutinok 
kezdocimenek decimAlis es hexadecimAlis erteken kivul ismertetjuk 
az egyes alprogramok meghivAsakor Atadand6 informAcio f ill. a 
rutin visszaterese utAn szolgAltatott ertekek ertelmezeset. A 
kovetkezd fejezetekben a kulonbozo szAmAbrAzolAsi modokhoz - 
egesz tipusii, egyszerespontos val6s es duplapontos val6s - tarto- 
z6 6sszead6 f kivondf szorz6 f osztOf osszehasonl it6 es konvertAld 
rutinok felhasznAlAsAt ismertetjuk. 

2.4.1. Egesz tipusu navel etek 

Az egesz tipusa muveleteket vegrehajtd rutinok operandusait 
a^(HL), (DEJ vagy a Lebegopontos AkkumulAtor #1 regiszterben kell 
Atadni. A mavelet eredmenye a(HL)f az A vagy a Lebegopontos Akku- 
mulAtor #1 regiszterben keletkezik. Az alAbbi tAblAzatban az 
egyes rutinok operandusait illetve a szolgAltatott eredmenyeket 
tArolo regisztereket foglaljuk ossze. 



V'D^ Y'^ t>' 



r>- 
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OPERANDWS #1 OPERANDUS #2 



(DE) (HL) 

(DE) (HL) 

(DE) <HL) 

(DE) (HL) 

(DE) (HL) 

Leb. Akk. #1 



MOVELET 


EREDMfeNY 


+ 


(HL) 


- 


(HL) 


* 


(HL) 


/ 


Leb. Akk. #1 


CMP 


(A) 


CINT 


Leb. Akk. #1 



(Az «re*»eny minden esetben a Leb. Akk. *l-ben is megtalil- 
hat6.) 

OESZEADAS Belepesi cim: 03026; 0BD2 

Egesz tipusi osszeadAs. Amennyiben az osszeadAs sorAn 
tiilcsordulAs keletkezik, a rutin az osszeadAst mindket ope- 
randus egyszerespontos val6s tipusiivA konvertAlAsa utAn 
vegzi el. Ekkor az eredmeny a Lebegopontos AkkumulAtor #1- 
ben keletkezik. 

KIVONAS Belepesi cim: 03015; 0BC7 

Egesz tipusti kivonAs. Amennyiben a kivonAs sorAn alAcsordu- 
IA* keletkezik, a rutin a kivonast mindket operandus egysze- 
respontos valos tipusiivA konvertAlAsa utAn vegzi el. Ekkor 
az eredmeny a Lebeg6pontos Akkumulator tl-ben keletkezik. 

SZORZAS Belepesi cim: 03058; 0BF2 

Egesz tipustii szorzAs. Amennyiben a szorzAs sorAn t&lcsordu- 
lAs keletkezik, a rutin a szorzAst mindket operandus egysze- 
respontos val6s tipus&vA konvertAlAsa utAn vegzi el. Ekkor 
az eredmeny a Lebegopontos Akkumulator #l-ben keletkezik. 

OSZTAS Belepesi cim: 09360; 2490 

Egesz tipustii osztAs. A m&veletet csak mindket operandus egy- 
szerespontos valds tipusivA konvertAlAsa utAn vegzi el a 
rutin. Az eredmeny a Lebegopontos Akkumulator #l-ben kelet- 
kez i k . 

OSSZEHASONLITAS (CMP) Belepesi cirn: 02617; 0A39 

Egesz tipusi algebrai osszehasonl itAs. A muvelet elvegzese 
utAn a HL es DE regiszterpArok tartalma vAltozatlan marad. 
Az A regiszterben kepzodo eredmeny ertelmezeset a kovetkezo 
tAblAzat szemlelteti. 
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A tartalma 



az osszehasonlitAs eredmenye 



(A>=-1 
(A)=+l 
(A) = 



(DE)XHL) 
(DEX(HL) 
(DE)=(HL) 



KONVERZIO 



Belepesi cim: 02687; 0A7F 



Egyszerespontos val6s, vagy duplapontos val6s szAmot egesz 
tipusira konvertAl. A valds szAmot a Lebegopontos AkkumulA- 
tor tl~ben > a szAm tipusAt a 16559; 40AF cimen kell elhe- 
lyezni. Az egesz tipusara konvertAl t szam a Lebegopontos 
AkkumulAtor *l~ben keletkezik. A konvertAlAs eredmenyekent a 
valos szam egesz reszenek egesz tipusii alakjAt kapjuk. 

2.4.2 Egyszerespontos valos m&veletek 

Az egyszerespontos val6s m&veleteket v£grehajt6 rutinok 
operandusait a BCDE es a Lebegopontos AkkumulAtor #1 regiszterben 
kell Atadni. A m&veletek eredmenye az A vagy a Lebegopontos Akku- 
mulator #1 regiszterben keletkezik. Az alAbbiakban tablazatosan 
dsszefoglalva megadjuk az egyes rutinok operandusait, illetve az 
eredmenyt tArolA regisztereket. 



OPERANDUS 


tl 


OPERANDUS 


#2 


MOVELET 


EREDMfeNY 


b = 




(BCDE) 




Leb. Akk. 


#1 


+ 


Leb. Akk. #1 


fx? 


(BCDE) 




Leb. Akk. 


tl 


- 


Leb. Akk. *1 


C - 


MSB 


(BCDE) 




Leb. Akk. 


#1 


» 


Leb. Akk. #1 


D - 


WK^B, 


(BCDE) 




Leb. Akk. 


#1 


/ 


Leb. Akk. #1 


F = 


LSE> 


(BCDE) 




Leb. Akk. 


tl 


CMP 


(A) 






Leb. Akk. 


*1 







CBNG 


Leb. Akk. #1 







OSSZEADAS 

Egyszerespontos val6s osszeadAs. 
KIVONAS 

Egyszerespontos valds kivonAs. 
SZORZAS 

Egyszerespontos val6s szorzAs. 



Belepesi cim: 01B14;0716 



Belepesi cim: 01811;0713 



Belepesi cim: 021 19; 0847 
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OSZTAS 



Belepesi cim: 02210;03A2 



Egyszerespontos vat 6s osztAs. Az osztando erteket a BCDE 
regiszterekben, az oszto erteket a Lebegopontos AkkumulAtor 
11 -ben kell elhelyezni . Az eredmeny a Lebegopontos AkkumulA- 
tor #l-ben kepzodik. 



OSSZEHASONLITAS (CMP) 



Belepesi cim: 02572;0A0C 



Ket egyszerespontos val6s szAm algebrai osszehasont itAsa. A 
rouvelet elvegzese utAn a BCDE regiszterek, illetve a Lebego- 
pontos AkkumulAtor #1 erteke vAltozattan marad. Az osszeha-- 
sonlitAs eredmenyet az A regiszter tartalmazza. Az eredmeny 
ertelmezeset a kovetkezo tAblAzat adja meg. 



A tar talma 



osszehasonl itAs eredmenye 



(A)=-l 
(A>=*1 
<A> = 



Leb. Akk. *1<(BCDE) 
Leb. Akk. #0<BCDE) 
Leb. Akk. tl=(BCDE) 



KONVERZIO Ji65S%-ci bealU'ta*! Vvw<kelo1ti Belepesi cim: 02737;0AB1 



Eges 



<f 



■16553 new\ veHAo-^W 



tipusilf ill. duplapontos valos szAmot egyszerespontos 
valos szAromA konvertAl. -A mdvelet operandusa es eredmenye 
egyarAnt a Lebeg6pontos AkkumulAtor #l~ben helyezkedik el. 



2.4.3. Duplapontos valos aftveletek 

A duplapontos val6s mOveleteket vegrehajt6 rutinok operandu- 
sait a Lebegopontos AkkumulAtor *l-ben es a Lebegopontos Akkumu- 
lAtor #2-ben kell elhelyezni. A mftvelet eredmenye vagy az A 
regiszterben vagy a Lebegopontos AkkumulAtor tl-ben keletkezik. A 
kovetkezo tAblAzat az egyes rutinok operandusait, illetve az 
eredmenyt tAroti regisztereket ismerteti. 



OPERANDUS 


tl 


OPERANDUS 


*2 


MOVELET 


EREDMfeNY 


Leb. Akk. 


tl 


Leb. Akk. 


*2 


+ 


Leb. Akk. *i 


Leb. Akk. 


#1 


Leb. Akk. 


#2 


- 


Leb. Akk. *1 


Leb. Akk. 


tl 


Leb. Akk. 


*2 


« 


Leb. Akk. #1 


Leb. Akk. 


#1 


Leb. Akk. 


#2 


/ 


Leb. Akk. *1 


Leb. Akk. 


#1 


Leb. Akk. 


#2 


CMP 


(A) 


Leb. Akk. 


tl 







CDBL 


Leb. Akk. #1 
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OSSZEADAS 

Duplapontos valos osszeadas. 
K I VON AS 

Duplapontos val6s kivonas. 
SZORZAS 

Duplapontos val6s szorzas. 
OSZTAS 



Belepesi cim: 03191 ;0C77 



Belepesi cim: 03184; 0C70 



Belepesi cim: 03489; 0DA1 



Belepesi cim: 03557; 0DE5 



Duplapontos val6s osztas. Az osztandAt a Lebegopontos Akku- 
mulator #l-bei az osztot a Lebeg6pontos Akkumulator #2-be 
kell elhelyezni. A hanyados a LebegGpontos Akkumulator #1- 
ben kepz6dik. 



OSSZEHASONLITAS (CMP) 



Belepesi cim: 02680; 0A78 



Ket duplapontos val6s szam algebrai osszehasonlitasa. A 
mavelet elvegzese utan mindket Lebegopontos Akkumulator 
erteke valtozatlan marad. Az osszehasonlitas eredmenyet az A 
regiszter tartalmazza, melynek ertelmezeset a kovetkezo 
tab I az at adja meg. 



A tartalma Az osszehasonlitas eredmenye 



(A)=-l Leb. Akk. #l>Leb. Akk. #2 
(A)=+l Leb. Akk. #KLeb. Akk. *2 
(A)= Leb. Akk. #l=Leb. Akk. *2 



K0NVERZI0 



Belepesi cim: 02779; 0ADB 



Egesz tipusii, ill. egyszerespontos valos szamot duplapontos 
valos szamma konvertal. A konverzi6 operandusa es eredmenye 
egyarant a Lebegopontos Akkumulator #l-ben helyezkedik el. 

2.5. Fuggvenyek 

Az alabbiakban ismertetjuk az aritmetikai fuggvenyek fel- 
hasznilasahoz szukseges parametereket es a fuggvenyszamitas algo- 
ritmusAt. Megadjuk az egyes fuggvenyeket megvalositd rutinok 
decimalis es hexadecimalis belepesi cimeit. A fuggvenyertekek egy 
reszet a PRIMO a matematikab6l ismert sorfejtesre alapozva hata- 
rozza meg. Az adott sor konvergenciajat6l fuggoen a duplapontos 
szamoknal szokasos pontossag eleresehez a sor sokkal tobb tagjat 
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.- C 'A'' 



3 5 7 9 

X X V, x 

3! 5! 7! 9! 



kellene kiszAmitani» ami az aritmetika mG.kodesi idejet tekintve 
gazdasAgtalan tenne. Ezert a PRIMO - mis gepekhez hasonloan - 
csak egyszerespontos valis erteket szolgAltat a logaritmikus, 
exponenciAlis, trigonometrikus es inverz tr igonometr ikus fuggve- 
nyek eseten. A fuqqvenvek argument urnAt a Lebegopontos Akkumul Ator 
tl-ben kel I elhelyezni^ Ha a fuggveny az elobb emlitett, csafc" 
egyszerespontos valos erteket ado fuggvenyek valamelyike, akkor 
as argumentumnak egyszerespontos vaL6s szAmnak kel I lennie. _A. 
fuggvenyer teket a Lebegopontos AkkumulAtor tl-ben kapjuk vissza. 

SIN(x) Belepesi cim: 05447; 1547 

A fuggvenyerteket a PRIMO a 



sin(x)= x 



sor alapjAn hatArozza meg, ahol x radianban ertelmezett 
sz 6g . 

COS(x) Belepesi cim: 05441; 1541 

A fuggvenyerteket a PRIMO az isrnert 

cos ( x ) =si n ( x+pi /2 ) 

azonossAg alapjAn hatArozza meg. A kifejezesben x radiinban 
ertelmezett szog. 

TAN(x) Belepesi cim: 05544; 15A8 

A fuggvenyertek meghatArozAsAra a PRIMO a 

tan(x)=sin(x)/cos(x) 

osszefuggest hasznAlja fel. A kifejezesben x radiAnban er- 
telmezett szog. 

ATN ( x ) Belepesi cim: 05565; 15BD 

A megfelelo pontossAg eleresehez a PRIMO az 

3 5 7 9 11 13 15 17 

xxxxxxxx 

3 5 7 9 11 13 15 17 

sor aktuAlis erteket hatArozza meg. 
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EXP(x) Belepesi cim: 05177; 1439 

A fuggvenyerteket a PRIMO kovetkezo sor ertekenek meghatAro- 
zAsAval szAmitja ki. 

2 3 4 5 6 

X X X X X 



exp(x)= 1 + x + + 



■-> i rs i 



4! 



LOG(x) Belepesi cim: 02057;0809 

A fuggvenyertek kiszAmitAsAhoz x ertekenek alkalmas Atalaki- 
tAsa es a 

0.5 i x < 1 

interval lumba torteno normal izAl Asa utAn a PRIMO a kovetkezo 
sort hasznAlja fel. 

/ x-1 \ 2 / x-1 \ 3 2 / x-1 n5 



log(x)= 2* + » 



+ « 



\ x+1 / 3 \ x+1 / 5 \ x+1 
X Y Belepesi cim: 05106; 13F2 

A hatvAnyertek meghatArozAsakor a PRIMO az 

y y*ln(x) 
x -e' 

azonossAgot hasznAlja fel. A rutin meghivAsa elott x egysze- 
respontos val6s erteket a STACK-be kell elhelyezni tiigy, hogy 
a STACK tetejen a szAm Kitevoje, alatta a szAro MSB Byte-ja, 
stb. Alljon. A tetszoleges tipusii y erteknek a Lebeg6pontos 
Akkumulitor #l-ben kell lennie. 

SQR(x) Belepesi cim: 05095; 13E7 

A fuggveny ertekenek meghatArozAsAra a PRIMO a kovetkezo 
azonossAgot alkalmazza. 

. , 0.5*ln(x) 
sqr (x)=e 

RND(x) Belepesi cim: 05321 ; 14C9 

A PRIMO egy veletlen ertek meghatArozAsAra az elozdleg el 6- 
Allitott veletlen szAmot hasznAlja fel. Az alkalmazott 
keplet a kovetkezo: 

x. . = (x.* 5105216) mod 2 24 + 372837 
l + l l 

fcet^N *¥>: 4,M n _ 45 
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Ha az RND fuggveny hivasakor a Lebegopontos Akkumulitor #1 
erteke 0...1 interval lumba esik, akkor a rutin Altai el6Al- 
litott veletlen szam is ezen interval I umon belul talalhato. 
Amennyiben a hivaskor atadott parameter egynel nagyobb szam 
volt, a generalt veletlen ertek a 0. . .parameter ertek koze 
esd egesz szam lesz. 

INT(x) Belepesi cim: 02871 ;0B37 

Az INT fuggveny eredmenyul a Lebegopontos Akkumulator #l-ben 
orzott . szamertekhez legkozelebb esd, annil kisebb, vagy 
azzal egyenld egesz szamot adja. 

piX(x) Belepesi cim: 02854; 0B26 

A fuggvenyertek kiszamitasa a kovetkezd keplet alapjin 
tortenik. 

fix(x)=sgn(x)*int<abs<x>) 

ABS(x) Belepesi cim: 02423; 0977 

A fuggveny a Lebegopontos Akkumulator #l-ben drzott szam 
abszolat erteket adja eredmenyul. 

SGN(x) Belepesi cim: 02442; 098A 

Az SGN fuggveny eredmenyul egy egesz tipusu szamot szolgal- 
tat. Az eredmeny erteke a Lebegopontos Akkumulitor #l-ben 
6rzott szam eldjelenek fuggvenyeben -1, 0, ill. +1 lesz. 
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3. FEJEZET 



A PRIHO periferia kezeld rutinjai 



Ebb en a fejezetben ismertetjuk a PRIHO periferia kezelo 
prograrajait. Megadjuk az egyes rutinok ugr6tAblAban elhelyezett 
kezd6cimet f felsoroljuk a hivAs elott beAllitand6 parametereiket. 
Annak erdekeben, hogy a rutinok reszletes makodese irAnt erdeklo- 
ddk igenyeit is kielegitsuk f e fejezetben tArgyalt valamennyi 
rutin teljes - megjegyzesekkel kiegeszitett - programlistAja a 
Fuggelekben megtalAlhat6. 

3.1. A periferia kezeld rutinok ugrotAblAja 

Egy szAmitogep - koztuk a PRIHO - fejlesztese f ill. tovAbb- 
fejlesztese hosszabb idot vesz igenybe. A fejleszteseknek azonban 
mindig figyelembe kell venniuk a korabbi Allapotokat is. Annak 
erdekeben t hogy a berendezes korAbbi vAltozatAhoz elkeszitett 
programok az ujabb verzio megjelenesevel - Lehetoleg vAltoztatAs 
nelkul, vagy minimAlis AtalakitAssal - felhasznAlhatik maradja- 
nak f igen gyakran a makodteto programokban u.n. ugr6tAblAt hoznak 
letre. Ennek celja, hogy a leggyakrabban alkalnazott szubrutinok 
memoriAn beluli cime a szAmit6gep fejlesztese sorAn szabadon 
megvAltozhasson anelkul f hogy ez a mAr elkeszitett programok 
modositAsAt tenne szuksegesse. Az ugr6tAbla nem mAs f mint a 
mem6ria rogzitett cimen elhelyezett ugrA - feltetlen vezerlesAta- 
d6 - utasitAsok sorozata. Az ugrotAbla minden ut as it Asa egy-egy 
gyakran hasznAlt szubrutinra adja At a vezerlest. Az ugr6 utasi- 
tAsok sorrendjet a szAmitogep elsd vAltozatAban rogzitik* igy az 
a rendszert makodteto programok vAltoztatAsakor nem modosul , csak 
az ugrAsi cimek vAltoznak az uj verzionak megfelelden. Ha a 
FelhasznAlo az egyes rutinokat az ugrotAblAn keresztul hivja meg f 
a rendszerprogram vAltozAsa miatt szuksegesse vAlt cimm6dositAsok 
nem befolyAsoljAk programja makodeset. 

Mivel a vAltoztatAs lehetdseget a PRIHO eseteben is biztosi- 
tani akartuk f a PRIMO is rendelkezik egy ugrotAblAyal . Ebbe a 
tab I Aba a periferia kezelo programokra ugr6 utasitAsbkat gyujtot- 
tuk ossze. A fejezet hAtralevd reszeben ismertetesre kerulo ruti- 
nok - nehAny kivetett6l eltekintve - az ugrotAblAn keresztul 
elerhet6k. Ha a FelhasznAld nem serti meg az ugrotAbla elvet, 
programjai a PRIHO tovAbbfejlesztett vAltozatain is makoddkepesek 
maradnak. 
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3.2. NMI/TIMER rutin 

A PRIMO m&kodeset minden 1/50-ed mAsodpercben egy NMI - Nem 
Maszkolhat6 Interrupt - szakitja meg. ValahAnyszor a Z-80 mikro- 
processzor az NMI lAbon akt iv szintet erzekel, felfuggeszti az 
eppen fut6 program vegrehajtAsAt, es a vezerlest a 102;66 cimre 
adja. Itt talAlhato az NMI/TIMER rutin elsd utasitAsa. 

Az NMI/TIMER rutin kettos feladatatot lit el. Egyreszt a 
memoria ^6445; 403D. . . 16447; 403F cimein elhelyezked6 24 bit es__ 
szAmlil6 erteket novel i, mAsreszt a PRIMO hAtoldalAn levo RESET 
nyomogomb AllapotAt vizsgAlja. 

A 24 bites szAmlAl6 lehet6ve teszi, hogy a PRIMO 1/50 mAsod- 
perc pontossAggal "'24 orAnyi idotartamot merjen. Mivel a 
szAmlAlo erteket az NMI/TIMER rutin noveli, fuggetlenul 
att6l, hogy a PRIMO BASIC, vagy gepi k6dii programot hajt-e 
vegre, az 1/50 masodpercenkent esedekes vAltoztatAs bekovet- 
kezik. A szAmlAlo mddositAsa meg a raagnora torteno irAs/ol- 
vasAs idejen sew szu.net el. 

A szAmlAlo ertekenek m6dositAsa utan a PRIMO megvizsgAlja a 
RESET nyomogomb AllapotAt. Ha ugy talAlja, hogy a gombot nem 
nyomjAk, az NMI/TIMER rutin befejezi m&kodeset es a 
vezerlest a RAM 16408; 4018 cimen e lhelyezkedo utasitAsra 
adja. Itt rendesen egy olyan ugrd utasitAs talAlhat6, amely 
a vezerlest visszaadja a megszakitott programnak. Ha azonban 
a FelhasznAlo ezt megvAltoztat ja, akkor az NMI/TIMER rutint 
sajAt gepi k6da programjAval egeszitheti ki. 
Ha a PRIMO a RESET gombot megnyomott Allapotban talAlja, 
megvArja mig azt elengedik, majd a vezerlest a RESET rutinra 
adja. 

Az NMI/TIMER rutin csak akkor m&kodik, ha az NMI engedelye- 
zett. Azt ugyanis a KI-1 kimeneti kapu megfelelo programozAsAval 
ki lehet kapcsolni. 

3.3. RESET rutin 

A RESET rutin feladata, hogy a PRIMO periferia kezelo rutin- 
jainak RAM-ban elhelyezkedo munkaregisztereit alaphelyzetbe 
Allitsa. Ez ket esetben tortenik meg: 

a PRIMO bekapcsolAsakor, ill. abban az esetben, ha a 
vezerles a cimre ad6dik. A munkaregiszterek inicializAlAsa 
utAn a PRIMO megvizsgAlja, hogy a ROM 2.-4. tokja a '84.1 
verzi6 programjait tartalmazza-e. Ha "idegen" tokot talAl, 
ahelyett, hogy a BASIC Interpretert inditanA, a vezerlest az 
"idegen" toknak adja. (A ROM-csere megval6sitAsAnak reszle- 
teivel a PRIMO Hardver LeirAs foglalkozik. ) 
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a RESET bi I lentil megnyomAsa, majd elengedese utAn, ha az NHI 
engedelyezve van. Ilyenkor a munkaregiszterek inicializALAsa 
utAn a PRIMO a vezerlest a RAH 16414: 401E cimen elhelvezkedo 
utasitAsra adja. Itt rendesen egy olyan ugr6 utasitAs talAl- 
hat6, amely a vezerlest a BASIC Interpreter direkt - parancs 
- uzemmAdjAt megvalosito rutin kezdetere adja. Ha azonban a 
FelhasznAlo ezt megvAltoztatja, akkor a RESET rutint sajAt 
gepi k6da programjAval egeszitheti ki. 

3.4. VArakozAs kepkioltAsra rutin - VBLANK 

Ha a kepernyon - akAr egy rajzfilmen - egy alakzatot 
kivAnunk mozgatni, gondoskodnunk kell arrol, hogy a keptartalon 
csak a kepkioltAs ideje alatt vAltozzek. Ha ezt nem tesszuk meg, 
a kepernyon - szAndekunk ellenere - villodz6 AbrAt lAthatunk. 

A VBLANK rutin meghivAsa utAn kivArja, amig a PRIMO kioltja 
a hozzA kapcsolt TV kepernyGjet, majd visszater a hivo programba. 
Ekkor a FelhasznAlo a szukseges keptartalom modositAsokat a 
kepkioltAs hAtralevd idejeben - "1 msec - elvegezheti. 

Belepesi cim:^99VMf«AMh» Al^k^) 

(A rutin kezddcime - mivel nem ugrotAbla-cim a PRIMO f 84. 1 
verziojAra ervenyes. ) 

3.5. Keperny6 kezeld rutin - DSPHND 

A kepernyo kezeld rutin feladata, hogy a PRIMO kepernyo jere 
normAl, ill. nyajtott, vizszintes vagy fuggdleges All Asa karakte- 
reket rajzoljon. Ezen talmenden a DSPHND vegrehajtja a vezerld 
kodok - 1.. .29 - Altai kijeldlt maveleteket is. 

A keperny6 kezeld program szAmAra a megjelenitendd/vezerlo 
kddot az A regiszterben kell Atadni. A DSPHND makodesenek kezde- 
ten menti a mikroprocesszor regisztereinek AllapotAt, majd eldon- 
ti, hogy a kod megjelenitheto karaktert, ill. vezerl6 funkci6t 
jekepez-e. A vizsgAlat eredmenyenek fuggvenyeben a rutin kulonbo- 
zdkeppen folytatja makodeset. 

\ 
Ha a k6d egy vezerlo karakter, a DSPHND meghatArozza, hogy a 
lehetseges 24 funkci6 kozul eppen melyiket kell vegrehajta- 
nia. EzutAn a vezerlest a szubrutin azon resze kapja, amely 
a kijelolt mavelet vegrehajtAsAra irodott. A reszprogram 
makodesenek vegezetevel megtortenik a korAbban mentett re- 
giszter tartalmak visszaAll it Asa, majd a vezerlest a hivo 
program kapja vissza. 

Amennyiben bemeneti parameter ken t egy megjelenitheto karak- 
ter kodjAt adtuk meg, a DSPHND megAllapitja, hogy FelhasznA- 
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16 Altai definiAlt - 128... 255 - vagy normal - 30. . . 127 - 
karaktert kell-e a kepernydre rajzolnia. A vizsgAlat ered- 
menyenek fuggvenyeben a PRIMO a karakter pontmintAzatAt vagy 
a Kiegeszitd KaraktergenerAtor Teruletrdl - melynek kezddci- 
met a RAM 16459; 404B cimen kezdd dd szd tarolja - vagy az 
Alap KaraktergenerAtor Teruletrdl olvassa ki. MiutAn a 
DSPHND meghatArozta a pontmintAzat cimet, megkezdddik a 
karakter megjelenitese. Ennek sorAn a_ RAM 16455; 4047 c imen 
elhelyezkedd Allapotjelzd byte pillanatnyi tartalma Altai 
meghatArozott formAban a DSPHND a kurzor aktuAlis pozicidjA- 
ba rajzolja a kivAlasztott karaktert. A megjelenites utAn 
beAllitja a kurzor aj pozicidjAt. Ekkor - ha szukseges - 
elvegzi a kepernyd tartalora egy sorral feljebb csasztatAsAt 
- roll - is. A karakter megjelenitese utAn megtdrtenik a 
korAbban mentett regiszterek tartalmAnak visszaAll it Asa, 
majd a vezerlest a hivd program kapja vissza. 

(A megjelenitendd karaktert a DSPHND a kurzor aktuAlis pozi- 
cidjAba rajzolja. E karakterpozicid bal felsd pontjAnak X es 
Y irAnyd koordinAtAit a RAM 16456; 4048 es 16457; 4049 cimein 
elhelyezkedd byte-ok tAroljAk. Mivel" ezek - a lehetseges 
tartomAnyon belul - tetszdleges erteket felvehetnek, a meg- 
jelend karakter bal felsd pontja a kepernyd 49152 pontja 
kozul bArmelyik lehet. Tgy az is eldfordulhat, hogy pi. 
vizszintes irAs eseten a karakter also, ill. jobb oldali 
pontjai mAr nem fernek el a kepernydn. Ezt a PRIMO felisme- 
ri, es nem folytatja a karakter rajzolAsAt. CEllenkezd eset- 
ben a t&lnyfidd pontok a kep bal-, ill. felsd szelen jelenne- 
nek meg.] Ez viszont azt eredmenyezi, hogy a kepernyon 
csonka karakter jelenik meg. Az emlitett eset csak akkor 
fordulhat eld, ha a FelhasznAld a kurzor pozicid X es Y 
koordinAtAit meggondolatlanul - pi. a BASIC POKE utasitA- 
sAnak felhasznAlAsAval - vAltoztatta meg, ill. a vezerld 
kddokat figyelmetlenul alkalmazta. Mindket esetben a keper- 
nyd tdrlese - 12; 0C kdd - visszaAll it ja a helyes X es Y 
koordinAtAkat. ) 

Belepesi cim: 00021; 0015 

Bemeneti parameterek: 

(A) = megjelenitendd/v*grehajtandd kdd 

Kimeneti parameterek: 

A DSPHND rutin a mikroprocesszor valamennyi regisztere- 
nek eredeti AllapotAt megdrzi. Visszateres utAn a flag- 
ek Allapota az A regiszter tartalmAnak megfeleld. 
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3.6. Billentyftzet kezeld rutinok 

A PRIMO billentyftzet kezelo rutinjainak celja, hogy egy 
megerintett gomb ASCII kodjat eloallitsak, es a hivd program 
rendelkezesere bocsassak. 

A ket rutin a billentyftzet vizsgald - KYBHND - es a kivara- 
sos billentyftzet vizsgald - KKBHND -. A kdvetkezdkben kuldn-kulon 
dsszefoglaljuk az egyes rutinok tevekenysegeit. 

A KYBHND meghivasa utan menti a mikroprocesszor regisztere- 
it, majd megvizsgal ja, hogy nyomjak-e a billentyftzet valame- 
lyik gombjat. Ha aktiv billentyftt talal, egy tablazat segit- 
segevel meghatirozza annak ASCII kodjat, majd a korabban 
mentett regiszter tartalmak visszaall itasa es az elfiallitott 
k6d A regiszterbe helyezese utan visszater a hivd programba. 
Amennyiben a billentyftzet egyetlen gombjat se talalja aktiv- 
nak, az A regiszterben ert^kkel ter vissza a hivd program- 
ba. (A KYBHND rutin u.n. special is uzemmodban is uzemeltet- 
het6. Ezt a R A|1 16453; 4045 cimen elhelyezkedo byte 0-4s 
bitjebe irt 1 ertekkel vilthatjuk ki. Ekkor a I billentyfi 
specialis jelentest kap. Egy gomb es a * billentyft egyuttes 
megerintese - a SHIFT gombhoz hasonloan - modositja a rutin 
Altai visszaadott ASCII kddot. Ennek eredmenyekent nem a 
gomb eredeti erteke, hanem annal 128-al nagyobb kod kerul az 
A regiszterbe. ) 

Belepesi cim: 00029; 001D 

Kimeneti parameter ek: 

A KYBHND rutin a mikroprocesszor valamennyi regisztere- 
nek eredeti allapotat megdrzi. Visszateres utan a flag- 
ek illapota a visszaadot kdd ertekenek - az A regiszter 
tartalnanak - megfeleld. 

A KKBHND meghivasa utan menti a mikroprocesszor regisztere- 
it, majd meghivja a KYBHND rutint. Ha ftgy talalja, hogy a 
visszakapott kod nullat6l kulonbozik - nyomjik valamelyik 
billentyftt -, a korabban mentett regiszter tartalmak vissza- 
all itasa es a KYBHND-t6l kapott kod A regiszterbe helyezese 
utan visszater a hivo programba. Amennyiben a visszakapott 
kod tanusaga szerint a billentyftzet egyetlen gombjat se 
nyomjik, mindaddig ftjra inditja a KYBHND rutint, amig az 
aktiv billentyftt nem talil. Ennek megfeleloen a KKBHND rutin 
csak akkor ter vissza a hivd programba, ha megerintjuk a 
PRIMO valamelyik gombjat. A varakozas ideje alatt a keper- 
nydn az aktuilis pozici6ban egy villog6 kurzor I at hat 6. 
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Arnennyiben egy gombot megerintunk, a KKBHND a megszerzett 
koddal visszater a hivo programba. Ha az ismet elinditja a 
kivirasos billentyftzet kezelo rutint es az elobbi gombot 
megerintese 6ta folyamatosan nyomjuk, egy megfelelo idozites 
letelte utin - annak ellenere, hogy a gomb illapotiban 
viltozis nem tortent - a vezerlest ismet a hiv6 program 
kapja vissza. Ezzel a KKBHND rutin megval6sitja az u.n. 
automatikus ismetles - auto repeat - funkciot is. 

Belepesi cim: 00037; 0025 

Kimeneti parameterek: 

A KKBHND rutin a mikroprocesszor valamennyi regisztere- 
nek eredeti illapotit megdrzi. Visszateres utin a flag- 
ek illapota a visszaadot kod ertekenek - az A regiszter 
tartalminak - megfelelo. 

3.7. Nyomtato kezelo rutin - PRTHND 

A PRTHND rutin feladata, hogy a PRIHO-hoz illesztett nyomta- 
tora egy karaktert irjon ki. A nyomtat6 kezelo rutin vegrehajtja 
- a beillithatd parametereknek megfeleloen - a sorok es lapok 
tordeleset is. 

A PRTHND r ut i n iwegter^sy "nfeAn -men fct= a mi k rop i -"oc es ca]or^ y e — 
giszfce,reit > ' majd megvizsgal ja> hogy az A regiszter ben kapott 
karakter vezerlo kod-e. A vizsgilat eredmenyenek fuggvenyeben a 
rutin makodese a kovetkezokeppen alakul. 

Ha a vizsgilt karakter nem vezerli kod, a PRTHND a karaktert 
a nyomtatora listazza. Ennek sorin eloszor megvizsgilja, 
hogy a nyomtat6 kepes-e egy byte fogadisira. Ha azt talilja, 
hogy a rendszerben nines uzemkepes nyomtato - nines illeszt- 
ve f vagy nines bekapcsolva -, hangjelzessel figyelmezteti a 
FelhaszniL6t. Ha van uzemkepes nyomtato, de az eppen egy 
korabban kikuldott karakter papirra irisival van elfoglalva, 
kivirja aroig az befejezddik, majd elkuldi a karakter kodjit 
a nyomtat6nak. Ezutin a PRTHND megvizsgilja, hogy az eppen 

nyomtatis alatt all 6 sor hossza elerte-e a_Rj&H 16464; 4050 

cimen tarolt maximilis sorhossz erteke t. Ha nem, a korabban 
mentett regiszter tartalmak visszaillitisa utin a vezerlest 
a hivo program kapja meg. Arnennyiben a sor elerte az engede- 
lyezett hosszt, a PRTHND egy CR - Carriage Return, Kocsi 
Vissza - karaktert kuld a nyomtatdra, majd megvizsgilja, 
hogy a lapon levd sorok szima elerte-e a RAM 1 6465; 4051 
cimen tarolt maximal is laphosg r ftr*- AI " Af Ha~nem, a korabban 
mentett regiszter tartalmak visszaillitisa utin a vezerlest 
a hivo program kapja vissza. Arnennyiben betelt a lap, a 
PRTHND egy FF - Form Feed, Lapdobis - karaktert kuld a 
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nyomtatora. (Abban az esetben, ha a 16465; 4051 cim erteke 
127-net nagyobb, a PRTHND nem vizsgalja a lap beteltet, 
vagyis nem kuld ki FT k6dot. ) A PRTHND kezdetben egy sor 
maximal is hosszat 80-nak, egy Upon levo sorok maximalis 
szamat 58-nak tekinti. 

A PRTHND ket vezerlG k6dot kepes ertelmezni. Az egyik a CR, 
a roasik a FT. Ha e k6dok valamelyiket felismeri, ugy jar el, 
ami nt azt a karakter kinyomtatasat kovetd tevekenysegeknel 
az eldbbiekben leirtuk. 

Az eddig emlitetteken til a PRTHND arra is utasithatd, hogy 
a PRIHO ket karakter enek k6djat - a kulonfele nyomtatok egysze- 
r&bb illesztese erdekeben - atalakitsa. Ezek a 30; IE - i - es 
31; IF - t - kodok. Ha a RAM 16453:4045 cimfo i elhelyezkedo byte 3- 
as bitjebe erteket irunk, a PRTHND az emlitett kodok elofordu- 
lasa eseten a kovetkezd konverziokat hajtja vegre: 

30; IE - i - -* 105; 69 - i - 

31; IF - t - -* 94;5E - ASCII t - 

Alapertelmezesben a PRTHND vegrehajtja a konverzi6t. 

Belepesi cim: 00045; 002D 

Bemeneti parameterek: 

(A) = a kinyomtatand6/vegrehajtando k6d 

Kimeneti parameterek: 

A PRTHND rutin a mikroprocesszor valamennyi regisztere- 
nek eredeti allapotat megorzi. Visszateres utan a flag- 
ek Allapota a kiiratott karakter kid ertekenek - az A 
regiszter tartalmanak - megfeleld. 

3.8. Egy sort beolvaso rutin - GLINE 

A BASIC Interpreter rndkodese soran - de barmely mis, a Fel- 
hasznilo altal irt programban is - gyakran szukseges, hogy a 
PRIMO a billentyftzetrdl tobb karakterbdl all6 stringet olvasson 
be. A GLINE rutin celja, hogy vegrehajtsa ezt az ismetlddd teve- 
kenyseget. 

A GLINE Altal beolvashat6 sor maximal isan 210 karaktert 
tartalmazhat. A rutin a beolvasott kidokat beerkezesuk sorrendje- 
ben eltarolja egy - szabadon megvalaszthato cimen elhelyezkedo - 
pufferbe. A sor beolvaso rutin a karakter kodok tarolasaval 
egyiddben azokat a kepernydn is megjeleniti - echo -. A rutin 
meghivasa utan menti a mikroprocesszor megfeleld regisztereit, 
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majd rneghivja a KKBHND szubrutint. A kivarasos billentyftzet keze- 
16 rutint6L visszakapott k6drdl eldonti, hogy vezerlo-, ill. 
megjelenithet6 karakter k6dja-e. Annak fuggvenyeben, hogy mi a 
vizsgalat eredmenye, a GLINE rutin kulonfelekeppen mftkodik. 

Ha a kod egy megjelenitheto karaktert jelol, a GLINE rutin 
megvizsgalja, hogy az eddig pufferbe tarolt karakterek szama 
egyenl6-e 210-zel. Ha mar teljesen feltoltotte a tarol6t, az 
uj kid pufferbe irasa helyett hangjelzessel figyelmezteti a 
Felhasznalot a sor beteltere. Amennyiben meg nines 210 byte 
a pufferben, elhelyezi az ujonnan beolvasott karakter k6dot 
a tarol6 soronkovetkezo szabad cimere, majd az a'j allapotnak 
megfeleloen m6dositja a puffer pointer es a sorhossz 
szamlal6 erteket. Ha ezeket a feladatokat vegrehajtotta, 
rneghivja a DSPHND rutint, amellyel a beolvasott k6dnak meg- 
felel6 karaktert a kepernyore rajzoltatja. Ezutan a GLINE 
rutin m&kodese egy ujabb karakter beolvasasaval folytatodik. 

Ha a beolvasott kod egy vezerlo karakter, akkor megvizsgal- 
ja, hogy az CR, BRK, SHIFT/-* , «-, SHIFT/*-, vagy CLS k6dja-e. 
Amennyiben az ertek valamennyi vizsgalt kodtol kulonbozd, 
anelkul, hogy a vezerlo kodot a pufferbe irna, a GLINE rutin 
rneghivja a kepernyo kezelo szubrutint, amely vegrehajtja a 
megadott vezerld k6d altal kijelolt funkci6t. Ezutan a GLINE 
rutin m&kodese egy ujabb karakter beolvasasaval folytat6dik. 

Ha a vizsgalt ertek a «- billentya k6dja - 08, BACK STEP -, a 
rutin kitorli a pufferb6l az oda utoljara rogzitett k6dot, 
majd a puffer pointer es a sorhossz szamli.16 erteket az aj 
helyzetnek megfeleloen m6dositja. Ezzel egy iddben torli a 
kepernydrfil az utoljara megnyomott billentyuhoz rendelt 
karakter kepet. 

Ha a GLINE SHIFT/*-, vagy CLS kddot talal, torli az eddig 
rogzitett osszes karakter kddjat a pufferbol, es eltavolitja 
a karakterek kepet a kepernyor6l - sor torles -. Ezutan 
eldrol kezdheto a karakter sor oz at begepelese. 

Ha a beerkezett kod egy vizszintes tabulator - SHIFT/-* - 
kddja, a rutin a karaktert figyelmen kivul hagyja, es foly- 
tatja a karakterek beolvasasat. 

A GLINE rutin befejezi a puffer feltolteset, ha CR, vagy BRK 
k6dot eszlel. Ilyenkor a puffer vegere egy ertekft byte-ot 
helyez, majd a kepernyon a kurzort - a DSPHND rutin segitse- 
g£vel - a kovetkezo sor elejere allitja. Ezutan a vezerlest 
visszaadja a hivd programba. Dtt a CARRY bit vizsgalataval 
elddntheto, hogy a sor utols6 karaktere CR, vagy BRK volt-e. 

d=o -^ cr*r 

A GLINE rutin a KKBHND szubrutint special is m6dban futtatja. 
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Ez azt eredmenyezir hogy lehetove vAlik - a 3.6. fejezetben 
leirt m6don - 128. ..255 koze esfi k6dok begepelese is. Ha a 
GLINE it yen tartomAnyba eso kodot eszlel, mieldtt azt a 
pufferbe helyezne» a vezerlest a RAM 16423:4027 cimere adja. 
Itt rendesen egy JP utasitAs talAlhato f amely visszaadja a 
vezerlest a GLINE rutinba. Ha ezt a FelhasznAlo Atirja, 
Lehetove vALik, hogy a speciAlis kod feldolgozAsAr6l maga 
gondoskodjek. (Lehetseges pi. olyan program keszitese* amely 
egyetlen bi I tent yd megnyomAsAra egesz szo - pi. egy BASIC 
kulcssz6 - bevitelet eredraenyezi. ) 

Belepesi cim: 00053} 0035 

Bemeneti parameterek: 

(HL) = sort tArolo puffer kezd6cime - 1 

Kimeneti parameterek: 

(HL) = sort tArol6 puffer kezdocime - 1 
(CY) = 1, ha a sor vegen BRK volt 

3.9. Magn6 kezetd rutinok 

A kovetkezdkben ismertetjuk a magnd kezeleset vegrehajto 
rutinok makod&set. Kiterunk az AllomAny ok logikai felepitesere f 
valamint a magno fizikai kezelesere. Megadjuk az AllomAnykezeles- 
hez szukseges rutinok belepesi cimeit es parametereit. 

3.9.1. Logikai AllomAnykezeles 

AkAr adatokatr akAr programokat* vagy a kepernyd aktuAlis 
tartalmAt rogzitjuk a magndra, a kivitt informAcio minden esetben 
egy logikai lag 6sszetartoz6 adathalmazt - u.n. AllomAnyt, idegen 
szoval file-t - alkot. Az AllomAny egy newel ell Atott, meghatA- 
rozott szerkezetft jet sor oz at. Az AllomAny kisebb logikai egyse- 
gekre - u.n. blokkokra - bonthatd. A blokkok nemelyike speciAlis 
- az AllomAnyra vonatkozo - informAciot tartalmazi a tobbi adato- 
kat tartalmazo adat-blokk. Blokk alatt AltalAban meghatArozott 
hosszasAga, ismert felepitesfl. adatsorozatot ertunk. 

Az alAbbiakban ismertetjuk az AllomAnyok, ill. a blokkok 
tipusait es felepitesuket. 

Minden AllomAny hArom kulonbozo tipusd blokkbol epul fel. Az 
AllomAny elsd blokkjAnak minden esetben az AllomAny nevet tartal- 
mazo nev-blokknak kell lennie. Ezt tetszdlegesen sok adat-blokk 
kovetheti. Az AllomAny vegen u.n. zArd-blokk All. Annak erdeke- 
ben f hogy a magnorol az AllomAnyokat a PRIMO biztonsAgosan vissza 
tudja olvasnii minden AllomAny nev-blokkja el6tt egy u.n. Al lo- 
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mAny-szinkron mezd helyezkedik el. A beolvasAs megbizhatdsAgAnak 
tovAbbi fokozAsa erdekeben minden blokk eldtt egy u.n. blokk- 
szinkron mezd talAlhatd. 

Az eddig leirtak alapjAn egy AllomAny Altai Anos felepitese: 



5UL* AW 



AllomAny-szinkron mez6 



blokk-szinkron mezd 



nev-blokk 



blokk-szinkron mezd 



adat -blokk #1 



blokk-szinkron mezd 



adat -blokk #n 



blokk-szinkron mezd 



zArd-blokk 



Az AllomAny tehAt kulonfele tipusft blokkok sorozata. . A blok- ^ 
kok szabv4nyos felepitesftek, kdzos jellemzdik a kdvetkezdk: 



Minden blokk elejen a mar emlitett blokk-szinkron mezd ta- 
lAlhatd. Ez 96 db 255;FF ertekft byte, amelyet 3 db 211;D3 
ertekft szinkron byte zAr le. A PRIMO akkor tudja a blokk 
szinkronizaciot helyesen vegrehajtani, ha a hArom 211;D3 
ertekft szinkron byte kdzul legalabb az egyiket felismeri. 

A blokk elsd - szinkron byte-okat kdvetd - karaktere az 1 
byte hosszftsAgft blokk-tipus. Ez az eppen betdltes alatt Alld 
blokk tipusAt jelzi. (A lehetseges blokk-tipusokat kesdbb 
ismertet juk. ) 

A blokk mAsodik - blokk-tipust kovetd - karaktere az adott 
blokk AllomAnyon beluli sorszamat tartalmazza. A blokk- 
sorszAm 1 byte hosszft, benne BCD kddban egy 0...99 kdze esd 
decimal is szim talAlhatd. 

A blokk-tipus es a blokk-sorszam utAn kdvetkeznek az adato- 
kat hordozd karakterek. Ezek szAma es ertelmezese az adott 
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blokk tipusat6l fugg. 

A blokk utolso karaktere az e L L enor z o-ossz eg ... Ez a blokk 
itvitele soran fellepd esetleges hibik felismereset szolgal- 
Ja. Az ellendrzd-osszeg egy 8 bites ertek f anely a blokkban 
levd - a blokk-tipust kovetft - valam ennyi byte erteke ossze- 
genek 256-tal torteno osztasa utan kapott maradekkal egyen- 
16. 

A blokkok altalanos felepitesenek leirasa utan a kovetkezdk- 
ben az egyes blokk tipusok feladatat es felepiteset ismertetjuk. 



Nev-blokk 
Feladata: 

Felepitese 
1. byte 



Az allomany elejenek jelzese, az allomany azonosita- 
sat celzo - maximal isan 16 karakter hossz&sagft - 
allomanynev tarolasa. 



2. byte 

3. byte 



- blokk-tipus (1 byte) 

- 131; 83 - BASIC program nev-blokk 

Az illomany vegyesen BASICr vagy gepi kodil program- 
blokkokatf ill. Kepernyd tartalom-blokkokat tartal- 
mazhat. 

- 135; 87 - Adat-allomany 

Az allomany csak BASIC adat-blokkokb6l allhat. 

- blokk-sorszam (1 byte) 
ferteke kotelezoen 0. 



Allomanynev hossz (1 byte) 

trteke az allomany nevenek hossz at 6 I fuggden 

lehet. 



1...16 



4 - Allomanynev (1...16 byte) 

Tetszoleges karaktereket tartalmazo 1...16 byte 
hossz isAgi karakter sorozat. 

n. byte - ellendrzo-osszeg (1 byte) 

Adat-blokk 

Tetszoleges binaris adatsorozat tarolasa. 



Feladata: 
Felepitese: 



1. byte - blokk-tipus (1 byte) 

- 241; Fl - BASIC program-blokk 0. 

- 245;F5 - Kepernyfi tartalon-blokk 



K *- J - -V I K , ■ , 
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- 247;F7 - BASIC adat-blokk 

- 249; F9 - Gepi k6dii program-blokk 

2. byte - blokk-sorszAm (1 byte) 

trteke 0...99 kozotti BCD szAm. 

3. byte - betoltesi cim (2 byte) 

A betoltesi cim BASIC program-blokk f BASIC adat-blokk 
es Kerernyo tartalom-blokk eseten relativ cim (a 
blokkban levo 1. byte AllomAnyon beliili sorszAma), 
Gepi k6dil program-blokk eseten abszolit cim (a blokk- 
ban levo 1. byte betoltes utani mem6ria cime). 

5. byte - blokkban levo byte-ok szAma (1 byte) 

A byte-szAm 0. ..255 kozotti erteket vehet fel. Ha a 
szAmlAl6 ertekft, ez 256 db byte-bol 4116 blokkot 
jelez. 

- Adat byte-ok (1...256 byte) 

- ellen6rz6-6sszeg (1 byte) 




Feladata: Az AllomAny vegenek jelzese. 
Felepitese: 

1. byte - blokk-tipus (1 byte) 

- 177;B1 - BASIC-* vagy Gepi k6da program-AllomAny veg. 
A zar6-blokk felismerese utAn a PRIMO a vezerlest a 
BASIC Interpreternek adja vissza. 

- 181;B5 - Kepernyo tartalom-AllomAny veg. A zArd-blokk 
felismerese utin a PRIMO a vezerlest a BASIC Inter- 
preternek adja vissza. 

- 183; B7 - BASIC adat-AllomAny veg. A zar6-blokk 
felismerese utin a PRIMO a vezerlest a BASIC INPUT# 
ut as it as At vegrehajto rutinnak adja vissza. 

- 185; B9 - Automat ikusan indul6 Gepi kodk program- 
AllomAny veg. A zAr6-blokk felismerese utAn a PRIMO a 
vezerlest a zAr6-blokk hAtralevd reszeben megadott 
memoria cimre adja At. 

2. byte - blokk-sorszam (1 byte) 

3. byte - inditAsi-cim (2 byte) 

InditAsi-cim csak a 185; B9 tipusd blokkban adhat6 
meg. MAs tipusii blokk eseten nines inditAsi-cim mez6. 

n. byte - ellendrzd-osszeg (1 byte) 
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Az AlloraAnyok bkokkokra tordelesenek eldnye, hogy betoltesi 
hiba - bit tevesztes - eseten nen szukseges a teljes AllomAny 
ismetelt beolvasAsa, elegend* a hibAs blokk lijraolvasAsa. A blokk 
struktiira kovetkezteben ugyanis egy hibAs blokk nines hatAssal a 
kovetkezo blokkra - es igy az AllomAny hAtralevd rtsz^re -, hanem 
a kovetkezo blokk elejen 4116 blokk-szinkron mez6 segitsegevel a 
PRIMO m&kodeset djra szinkronizAlhatja. Ezzel az adatrogzites 
biztonsAga jelentosen fokozhat6. 

3.9.2. A magno fizikai kezeltee 

A logikai AllomAnykezeles Attekintese utAn a kovetkezokben a 
magno fizikai kezeleset ismertetjuk. Ebben a fejezetben irjuk le 
a blokkokat alkot6 byte-ok |elirAsAnak es visszaolvasAsAnak mene- 
tet, a megbizhato adatAtvitelt segito szinkronizAciAval kapcsola- 
tos reszleteket. 

Mivel a magnira az adatok jelsorozat formAjAban kerulnek, 
igy a rogzitesi elv ismertetesekor elegendo egyetlen bit felirA- 
sAnak mikentjet bemutatni. 

Egy bit felirAsa a magnora 

A szemelyi szAmitdgepekhez AltatAban kiskereskedelmi forga- 
lomban kaphati magn6kat alkalmaznak. Ezek tobbnyire csak a hang- 
frekvenciAs tartomAny kozepso r6szen f kb. 400. ..6000 Hz kozott 
kepesek a jeleket elfogadhato formAban rogziteni. Meg e sz&k 
tartomAnyon belul is igen sok problemAt okoz a gyengebb keszule- 
keknel tapasztalhato magas zajszint es az igen nagy torzitAs. 
(Altai AnossAgban elmondhato, hogy megbizhat6 adatrogzitesre csak 
j6l beAllitott, gondosan karbantartott magno hasznAlhati. A be- 
rendezes olyan hibAja, amelyet zenehallgatAs sorAn meg csak ta- 
pasztalt megfigyel6 ismer fel, mAr meghiusithat ja az adatok he- 
lyes tArolAsAt. Ezert els6sorban a magno iro/olvas6 fejenek tisz- 
tasAgAra, az egyenletes szalagsebessegre, valamint a megfelelo 
bemeneti/kimeneti feszultsegszintek beAllitAsAra kell fokozottan 
ugyelni . ) 

A digitAlis jelrogzites alapgondolata f hogy a 0, ill. 1 er- 
tekft bitekhez ket - egymAstil viszonylag tAvoli» de a magn6 
biztonsAgos Atviteli tartomAnyAba es6 - kiilonbozd frekvenciAjil 
jelet rendelunk. VisszaolvasAskor a beerkezd jelek peri6dusideje- 
nek meresevel meghatArozhato f hogy a soronkovetkezd bit f ill. 1 
erteket tArolt-e. 

A PRIHO az ismertetett elvnek megfelelden rogziti a jeleket 
a magndra. Minden bit tArolAsAra egy szimmetrikus negyszogimpul- 
zus szolgAl. Ennek periddusideje a rogzitett bit ertekenek fugg- 
venyeben kulonbozfi. Az alAbbi ket Abra a 0, ill. 1 ertekfli bitek- 
nek megfelelo negyszogimpulzus alakjAt mutatja be: 
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1 ertekft bit jelalakja 

+ szint 

szint - - 

- szint 

ertekfli bit Jelalakja 

+ szint 



t =312 mikrosec 



« 1 .« 



-t, 



t =936 mikrosec 



szint 



- szint 



_t o ^ 1() -, 



Amint az AbrAkbol lAthat6, a negyszogimpulzusok a foldpoten- 
ciAlhoz kepest pozitiv. ill. negativ feszultsegszintekbol epulnek 
fel. Ezzel a harom Allapotb megoldAssal elkerulhetd a magndra 
kerulo nyugalmi es rogziteskori egyenAramii komponens viLtozasa, 
amely a jetsorozat els6 es utols6 bitjenek torzulAsAt ered- 
menyezne. A szimmetrikus felepites eredmenyekent az alkalmazott 
magnu esetleges polaritAsforditAsAnak - amely a visszaolvasott 
jel pozitiv es negativ feszultsegszintjeinek felcserelesevel 
jelentkezik - hat Asa mersekelhetd. 

A r ill. 1 ertekeket abrazolo negyszogimpulzusok arAnyAnak 
1:3 erteket vilasztottunk. E viszonylag nagy arAny segitsegevel a 
magn6 sebessegingadozAsAnak es torzitAsAnak jelmAdosito hat Asa 
ellenere a bit erteke meg biztonsAgosan visszaolvashatd. 

Mivel minden adatbitet hordoz6 hullAmalak az el6z6ekben jel- 
lemzett tulaJdonsAgokkal bir f elegendd egyetlen hullAmalak detek- 
tAlAsAnak mikentjet bemutatni. 

Egy bit visszaolvasAsa a magnordl 

Az egy bit visszaolvasAsAt vegz6 rutin a magnorol erkezo - a 
PRIMO megfelelo Aramkorei Altai digitalizAlt - hullAmalak Jel- 
lemzd iddtartamainak meresevel Allapitja meg, hogy az adott bit 

0. ill. 1 erteku-e. A bit azonositAsAnak raenete a kdvetkezd: 

1. A rutin addig vArakozik, amig a magnorol erkezd digitalizAlt 
jel erteke "+" szintft - logikai "1" - nem lesz. 

2. MiutAn a jel "+" szintil lett, megkezdddik a " + " szint ido- 
tartamAnak merese. Ennek sorAn a bit beolvaso rutin folyama- 
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tosan mintavetelezi a magno bemenetet mindaddig, amig a jel 
"-" vagy "0" szintft - logikai "0" - nem lesz. Ekozben a 
mintavetelek szamat egy regiszterben drzi. A mintavetelezes 
befejeztevel a szamlalo ertekenek vizsgalata kovetkezik. 

3. Mivel a magnorol gyakran rovid idejd zajimpulzusok is erkez- 
nekf a rutin elsokent azt vizsgalja, hogy a beolvasott jel 
"+" szinta tart oman yanak ideje eleri-e az 1 erteka bit ha- 
sonl6 reszenek - az u.n. alapiddnek (312 mikrosec) - 1/3-at. 
Ha a vizsgalt impulzus e hatarerteknel rovidebb, a PRIMO a 
jelet zajnak tekinti, es mbkodeset az 1. pontt6l folytatja. 

4. Ha a jel ""100 mikrosec-nal tovabb tart, akkor a rutin azt 
vizsgalja, hogy az alapidd ketszeresenel is hosszabb-e. Ha 
hosszabb, akkor a beolvasott bit erteket 0-nak tekintif mig 
rovidebb jel eseten a bitet 1-nek ertelmezi. 

Az ismertetett eljarassal +30X bit-ido ingadozas meg nem 
befolyasolja az azonositas menetet. Ez jelentdsen novel i a beol- 
vasas biztonsagat, mivel a digitalizalas utan merhetd bit-id6t 
egyreszt a nagn6 sebessegingadozasa, masreszt torzitasa modosit- 
hatja. Az eddig leirtakat a kovetkez6 abra szemlelteti: 



zaj hatar 
* 
1 1- 



komparalasi hatar 



= 1 



= 



( , 

< 1 

«- -t 

«- -» 



"100 mikrosec 
"312 mikrosec 
"624 mikrosec 
"936 mikrosec 



A bit beolvasas folyamatanak attekintese utan a kovetkezok- 
ben az allomany-szinkron mez6 feladatat es felepiteset ismertet- 
juk. 

Allomany-szinkron aezd 

A visszaolvasAs biztonsagat lenyegeben a magno sebesseginga- 
dozasa, torzitasa, valamint a szalag mindsege hatarozza meg. A 
jelfeldolgozast az is befolyasol ja, hogy az adott magn6 megval- 
toztatja-e a jel polar itasat. E tenyezdk hatasanak csokkentese 
erdekeben a PRIMO minden allomany rogzitesekor a szalagra egy 
allomany-szinkron mezdt ir fel. E mez6 visszaolvasaskor torteno 
elemzese segitsegevel a hibak jelentos resze kikuszobolhetd. 
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Az AllomAny-szinkron mez6 512 d b 170; AA ertekft byte-bol Alt. 
Egy AllomAny betoltesekor a PRIM) e bitsorozat vizsgAlatAval a 
magno sebessegere es polaritAsviszonyAra vonatkoz6 informAciokat 
szerezhet. Az Al lomAny-szinkron mezd feldolgozAsAnak menete a 
kovetkezo: 



1. 






A PRIMO megkeresi az AllomAny-szinkron mez6 elejet. A mez6 
kezdete abbol ismerhetd fel f hogy az els6 170;AA ertekfli byte 
el6tt a szalagon legalAbb 20 msec iddtartamil jelmentes resz 
talAlhato. Ha a PRIMO felismeri az allomany-szinkron mez6t» 
megkezdi annak feldolgozAsAt. 

A soronkovetkezo 4096 bit egy 10101010... jelsorozatnak 
felel meg. E szimmetrikus jelsorozatban roert Tovirf-6s hoBsz rt. 

• impulzuBok idejenek arAnyAbol a PRIMO megAllapitja, hogy az 
adott magn6 megvAltoztatja-e a rogzitett impulzusok polari- 
tAsAt. A megszerzett informAci6t a feldolgoz6 program a_RAH 
16479; 405F cim en tArolja. (Ha a magn6 polar it Ast fordit, egy 

"bit beolvasAsAnAl a PRIMO az alacsony es magas szinteket 
majd felcserelve ertelmezi.) 



3. A polaritAsviszonyok elemzese utAn a PRIMO beolvassa a mag- 

netofonrol erkezo 10101010... jelsorozat kovetkezo 256 bit 

hossz&sAga szakaszAt, es Atlagolja az ebben talAlhat6 bitek 

periodusidejet. Az igy kepzett ertekbol megAl lapithat6 az 

adott magn6 Atlagsebessege, kiszAmithat6 egy bit alapideje. 

S A kapott erteket a feldolgozo program a _RAM 16480:4060 cimen 

p tArolja. A modszer eredmenyekent a PRIMO ^Ox-os abszolat 

S sebessegingadozAs kompenzAlAsAra kepes. 

Blokk-szinkron aezd 

Egy blokk beolvasAsAt kovet6en megtortenik a beerkezett 
informAcio feldolgozAsa. Ennek ideje alatt azonban a magn6szalag 
- hacsak a tAvirAnyitAsr6l nem gondoskodunk - tovAbbhalad. Mivel 
a blokkok feldolgozAsAnak pontos ideje AltalAban nem Allapithat6 
meg - az ertek blokkonkent eltero is lehet -, minden blokk fel- 
dolgozAsa utAn a PRIMO a blokk-szinkron mez6 segitsegevel 
mftkodeset a magn6r6l erkezo jelekhez szinkronizAl ja. A blokk- 
szinkron mezd 96 db 255;FF es az ezt koveto 3 db 211; D3 byte-b6l 
All. Az utemezes folyamata a kovetkez6: 

1. A PRIMO beolvassa a blokk-szinkron mezo soronkovetkezo 
bit jet i majd annak erteket elhelyezi egy 8 bites regiszter 
legalacsonyabb helyiertekfl bitjeben. 

2. EzutAn a feldolgoz6 program beolvassa a kovetkezo bitett es 
a regiszter korAbbi tartalmAnak egy pozici6val tortend balra 
leptetese utAn az aj bitet elhelyezi a legalacsonyabb helyi- 
erteken. 
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3. Most a PRIHO megvizsgAlJa, hogy a regiszter aktuAlis erteke 
egyenl6-e 211;D3-al. Ha meg nem, akkor a blokk-szinkron mezd 
feldolgozAsAt a 2. ponttol folytatja. 

4. Amennyiben a regiszter erteke 211;D3-al egyenld, a PRIHO 
megtalAlta a bitsorozatban a byte-hatart. A tovAbbiakban az 
informAci6 Logikai beblvasAsa mar nem bitenkent, hanem 8 
bites byte-ok formAjAban folytathato. 

3.9.3. Magno kezelo szubrutinok 



A magno logikai es fizikai kezelesenek Attekintese utAn 
negadjuk a korabban isroertetett feladatokat megvalosito szubruti- 
nok belepesi cimeit, valamint hivAskor megadando parametereit. 

Nev-blokk felirasa - URHEAD Belepesi cim: 00146; 0092 

A szubrutin bekapcsolja a magno tAvvezerlest (a PRIHO 
hatlapjan talAlhat6 "TAPE" jeU csatlakozi 5-6s pontjAn +5V 
feszultseg jelenik meg). Ezutin 4 masodpercig vArakozik. 
Ennek eredmenyekent a szalagon az eldzd 6s a most rogzitendo 
AllomAny kozott egy konnyen felismerhetd "csendet" tartalma- 
z6 szalagresz alakul ki. A 4 masodperc letelte utan felirja 
a szalagra az AllomAny-szinkron mezdt, egy blokk-szinkron 
mezdt > majd vegezetul az allomany nevet tartalmazo nev- 
blokkot. 

Bemeneti parameterek: 

(HL) = AllomAnynev-leir6 cime 
(16476;405C) = nev-blokk tipusa — ,| _. 5-3 <r - 

Kimeneti parameterek: 

( 16478; 405E) = 0, kezdeti btokk-sorszAm 

Adat-blokk felirasa - URREC Belepesi cim: 00149; 0095 

A szubrutin a bemeneti parameterek Altai meghatArozott mem6- 
ria teruletet - 1/4 Kbyte meretft blokkokra bontva - a magno- 
ra rogziti. A kiirt blokk(ok) betoltesi-cim mezejebe az 
aktuAlis blokk 1. byte-jAnak (memoria cim - eltolAsi-cin) 
erteke kerul. 



11-63 



A PRIHO SZAHITOGfeP MOKODtSE 



Bemeneti parameterek: 

(BC) = eltolAsi-cim 

(DE) = mem6ria terulet kezd6cime 

(HL) = mentor i a terulet vegcime 

(16476;405C) = adat-blokk(ok) tipusa 

( 16478; 405E) = az elsd rogzitendo blokk sorszAma - 1 

Kimeneti parameterek: 

( 16478; 405E) = az utolsd rogzitett bLokk sorszama 

ZAro-blokk felirasa - ENDREC Belepesi cim: 00155; 009B 

A rutin egy blokk-szinkron mezo kiirAsa utAn egy szabvAnyos 
felepitesa zAro-blokkot rogzit a magn6ra. EzutAn kikapcsolja 
a magnd tAvvezerlest. 

Bemeneti parameterek: 

(16476;405C) = a zAro-blokk tipusa 

(16478;405E) = a zArd-blokk sorszAma ^qwi'ia hk^-C s \M9iq^) 

Nev-bLokk keresese/beolvasAsa - RDHEAD Belepesi cim: 00143; 008F 



A rutin bekapcsolja a raagnd tAvvezerlest, majd a szalagon - 
J55k& — 3? minimum 20 msec idfltartama - "csendet" keres. Ennek felisme- 
rese utln feldolgozza a soronkovetkezd AUomAny-szinkron 
mezdtf Atlepi a blokk-szinkron mezdt es beolvassa a nev- 
blokkot. EzutAn osszehasonlitja a megadott es a megtalAlt 
AllomAnynevet es tipust. Ha azok elterfiek, a rutin makodeset 
a "csend" keresest6l folytatja (Atlepi az eppen megtalAlt 
AllomAnyt). Ha a nev es tipus egyezik, a rutin visszater a 
hiv6 programba. (Ha a megadott AlloraAnynev rdvidebb, mint az 
eppen beolvasott nev f de a hosszabb nev elsd reszenek karak- 
terei rendre azonosak a megadott nev karaktereivel, a PRIHO 
a ket nevet azonosnak tekinti. Ha nem adunk meg AllomAnyne- 
vet - nev-hossz = - a rutin az elso egyezd tipusa AllomAny 
megtalAlAsakor visszater a hivo programba.) 

Bemeneti parameterek: 

(HL) = AllomAny-nev leir6 cine 
(16476;405C) = a keresett AllomAny tipusa — . ][.- ^t C^ 

Kimeneti parameterek: 

(16477;405D) = 0, kezdeti hibAs blokk-szAmlAlo xuA^L^Me^ 
( 16479; 405F) = FAzisforditAs Allapotjelzd 
(16480;4060) = SzAmitott bit idd 
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Blokk-szinkronizAlAs - RDSYN Belepesi cim: 15477;3C75 

(A rutin kezdocime - mivel nem ugr6tAbla-cim - A PR I MO '84.1 
verziojAra ervenyes. ) 

A rutin megkeresi a sz a I agon a soronkovetkezfi blokk-szinkron 
mezot, vegrehajtja a PRIHO szinkronizALAsAt, majd visszater 
a hivd programba. 

Kimeneti parameterek: 

(A) = a soronkovetkez6 blokk tipusa 

Adat-blokk beolvasasa - PRGREC Belepesi cim: 00152; 0098 

A rutin beolvassa a - tetszoleges tipusCi - soronkovetkezo 
blokkot. A szubrutin hivAsa el6tt vegre kelL hajtani a blokk 
szinkronizAci6t f es be kell olvasni a blokk-sorszAmot^A 
beolvasott blokk 1. byte-ja a blokkban l£vo betoltesi-cim, 
es a megadott kezddcim osszege ALtal kijelolt memoria cimre 
kerul. KTit^ci CL btolck SOfSZoLw/iCLt ds.cc ktbtf «a. iMot, 

Bemeneti parameterek: 

(BC) = memdria terulet kezdocime 

Egy byte beolvasasa - INBYTE Belepesi cim: 00158; 009E 

A szubrutin beolvassa a szalagon soronkovetkezo byte-ot 
alkoto 8 bitet, majd visszater a hivd programba. 

Bemeneti parameterek: 

(D) = kezdeti/aktuAlis ellendrzo-osszeg erteke 

Kimeneti parameterek: 

(A) = a beolvasott byte 

(D) = a beolvasott byte ertekevel modes i tot t ellen6rz6- 
osszeg 

3.10. Direkt kurzor cinzd rutin - DIRCUR 

A DIRCUR rutin segitsegevel a kurzor t a kepernyon a megadott 
sor/oszlop cimre Allithatjuk. 

A kivAnt sor f ill. oszlop cimeket a mikroprocesszor D, ill. 
E regiszterebe kell a DIRCUR rutin meghivAsa elott elhelyezni. A 
lehetseges ertekek a kovetkezdk: 
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Vizszintes iras eseten: sor cim = 0...15 

oszlop cim = 0...41 

Fuggoleges iras eseten: sor cim = 0...20 

oszlop cim ~ 0. ..31 

Vizszintes irasnal a kepernyA legfelso sora a 0-as sor, a 
sor on belul a balszelsA pozicid a 0-as oszlop. Fugg6leges irasnal 
a kep az dramutatA jarasaval ellenkezo iranyban, 90 fokkal el van 
forgatva, igy a 0-as sor a kepernyfi balszelsu sora, a sor on belul 
a 0-as oszlop a kep aljan talalhato. 

Ha a sor, ill. oszlop cim a megengedett tar toman yon kivul 
esik, a kurzor pozici6ja nem valtozik, es a vezerlest a hiv6 
rutin hibajelzessel - (CY) = 1 - kapja vissza. 

Belepesi cim: 00128; 0080 

Bemeneti parameterek: 

(D) = sor cim 

( E ) - osz I op c i m 

Kimeneti parameterek: , 

(CY) = 1, ha a sor, vagy oszlop cim hibas 4obbi v\&W\ 

3.11. Kurzor poziciot aegallapito rutin - KURP0Z 

A KURP0Z rutin megallapitja a kurzor aktualis kepernyc. soron 
beluli pozici6jat, majd az erteket a mikroprocesszor A regiszte- 
reben adja vissza a hiv6 rutinnak. Ha a kurzor nem szabvanyos 
pozicioban all - vagyis egy karakter bal felso pontjanak X,Y 
cimet a Felhasznald modositotta -, a KURPOZ altal adott ertek a 
kurzor tenyleges tart6zkodasi helyehez legkozelebb es6, annal 
nagyobb szabvanyos karakterpozici6 lesz. 

Belepesi cim: 00140; 00BC 

Kimeneti parameterek: 

(A) = kurzor aktualis soron beluli szabvanyos pozici6ja 

3.12. Grafikus pont kezelo rutinok 

A PRIMO kepernyoje vizszintesen 256, fuggdlegesen 192 pontot 
tartalmaz. A 49152 pont barmelyike a tobbitfil fuggetlenul kivila- 
gosithato, ill. elsotet ithet6. Lehetiseg van egy pont pillanatnyi 
allapotanak lekerdezesere is. Az emlitett funkcidkat a grafikus 
pont kezelo rutinok hajtjak vegre. 
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A kepernyo bal als6 pontja a 0,0 koordinatAja, jobb felso 
pontja a 255,191 koordinataja pont. A grafikus pont kezelo ruti- 
nok a koordinatakat makodesuk soran az 

X=x Y=191-y 

kepletek alapjan konvertaljak. Erre azert van szukseg, mert ku- 
Lonben a kep bal felsd pontja lenne a 0,0 koordinataja pont. (A 
grafikus pont kezelo rutinok nem tamogatjak a PRIHO - egyebkent 
lehetseges - 256*256 pontos uzemm6dj&t.) 

Egy grafikus pontot akkor nevezunk aktivnak, ha szine a 
kepernyo aktualis alapszinenek ellentetje, vagyis fekete keperny6 
alapszin eseten feher, ill. feher alapszin eseten fekete. 

Az egyes grafikus pont kezelo rutinok bemeneti parametereit 
azonosan kell megadni. A rutin makodese utan visszaadott ertekek 
is hasonloak. A kovetkezokben ismertetjuk a parameterek megadasa- 
nak, es a visszakapott adatok ertelmezesenek egyseges szabalyait. 

Bemeneti parameterek: 

(D) = az erintett pont y koordinataja (0 — 191) 

(E) = az erintett pont x koordinataja (0. ..255) 

Kimeneti parameterek: 

(D) = az erintett pont konvertalt - Y - koordinataja 

(E) = az erintett pont konvertalt - X - koordinataja 
(CY) = 1, ha az y koordinata nagyobb, mint 191 

Grafikus pont bekapcsolasa - SETD0T Belepesi cim: 00131;0083 

A rutin bekapcsolja - aktivva teszi - a bemeneti parameterek 
Altal kivAlasztott grafikus pontot. 

Grafikus pont kikapcsolAsa - CLRD0T Belepesi cim: 00134; 00B6 

A rutin kikapcsolja - inaktivvA teszi - a bemeneti paramete- 
rek altal kivAlasztott grafikus pontot. 

Grafikus pont vizsgalata - TSTD0T Belepesi cim: 00137; 0089 

A rutin megvizsgalja a bemeneti parameterek altal kivalasz- 
tott grafikus pontot. Ha aktivnak talAlja, a ZERO flag 
erteket 0-ra Allitja be. Inaktiv pont eseten a flag erteke 1 
I esz . 
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A PRIHO BASIC hibajelzesei 



A kovetkezdkben felsoroljuk a PRIMO BASIC hibajelzeseit. A 
leirAsban megadjuk a hiba ket betubol Alio emlekeztetd kodjAt f az 
emlekezteto k6dnak megfelelo angol nyelva hibaszoveget, ennek 
magyar nyelv& forditAsAt, es az adott hiba belsd kodjAt. A hi bar a 
jellemzd belsd k6d ismerete azert szukseges f mert a programozott 
hibajelzes - ERROR utasitAs - alkalmazisakor az ERROR kulcssz6 
utAn megadott kifejezes aktuAlis ertekenek ezt a k6dot kell - a 
kivAnt hibajelzes kivAltAsa erdekeben - megadnia. 

Ahogy azt a PRIHO BASIC leirAsban emlitettuk, valamely hiba 
felismerese utan a PRIMO beAllitja az ERR belsd vAltozo erteket. 
A kulonbozd hibAkhoz tartozd ERR-ertekek a hiba belso kodjAb6l a 
kovetkezd osszefugges segitsegevel hatArozhat6k meg: 

ERR-ertek=2»<bels6 kod-1) 



1 NF NEXT without FOR FOR nelkuli NEXT 

Nines olyan - eddig meg le nem zArt - ciklus, amelynek 
ciklusvAltoz6ja megegyezne a NEXT utasitAsban megadott 
ciklusvAltozoval, vagy - ha a NEXT utan nem All ciklus- 
vAltoz6 -» nines egyetlen eddig meg le nem zart ciklus 
sem. 

2 SN SyNtax Error Formai hiba 

A PRIHO a BASIC program vegrehajtAsa sor An egy olyan 
sort taLAltr amelyben formai hiba van. A hiba oka leg- 
gyakrabban helytelen zArdjelezes, nem megengedett karak- 
terek hasznAlata, vagy helytelen irAsjelek alkalmazAsa. 
Formai hiba megjelenese utAn a PRIHO automatikusan meg- 
jeleniti a hibAs sort, majd a kovetkezd kepernydsor 
elejen villogd kurzorral jelzi, hogy felkeszult a sor 
szerkesztesere. EzutAn a PRIHO BASIC nyelv leirAsAban 
ismertetett modon megkezdhetd a hibAs sor javitAsa. 

3 R6 RETURN without 60SUB GOSUB nelkuli RETURN 

A BASIC program vegrehajtAsa alatt a PRIHO egy olyan 
RETURN utasitAst talAlt, amelyet a programfutAs sor An 
nem eldzdtt meg 60SUB utasitAs. 
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4 OD Out of Data Kimerult a DATA-lista 

Egy READ utasitis vegrehajtisakor - mikozben meg van a 
READ utasitisban ertekre viro viltozo - a PRIMO elerte a 
DATA-lista veget. 

5 FC Illegal Function Call II legal is funkcidhivis 

Az FC hibajelzes megjelenese szimos kulonfele hibaok 
valamelyikenek bekovetkeztet jelzi. Altai inossigban ez a 
hibajelzes akkor jelenik meg, ha egy parancs, utasitis 
vagy fuggveny operandusa nem megfelel6 tipusu es/vagy az 
ertelmezesi tartominyon kivul esik. A hibajelzes okai 
reszletesen a kovetkezok: 

- AUTO parancs novekmenye egyenlo null Aval 

- DELETE parancsban a torlendd programresz kezddsorszima 
nagyobb, mint a vegsorszim 

- indexelt viltozo valamelyik indexe kisebb, mint nulla 

- CREATE, LOAD* OPEN vagy SAVE utasitisokban megadott 
program, ill. illominynev hosszabb, mint 16 karakter 

- PRINT* utasitis kifejezes listijiban TAB fuggvenyt 
alkalmaztunk 

- PRINT USING utasitisban a formitumvezerlo karakterso- 
rozat egyetlen karaktert sem tartalmaz (hossza = 0) 

- PRINT USIN6 utasitisban a formitumvezerlo karakterso- 
rozatban egy szimspecifikicio az egesz- es tortjegyek 
egyuttes szimit 24 szimjegynel tobbnek jeloli ki 

- VARPTR fuggveny argumentumakent olyan viltoz6t adtunk 
meg, amely eddig meg nem jelent meg egy kifejezesben, 
vagy ertekadisban 

- CLEAR utasitis operandusinak aktuilis erteke kisebb, 
mint nulla 

- ERROR utasitisban a megadott hibak6d nem az 1...255 
tartominyba esik 

- ON x GOTO/GOSUB utasitisban x kifejezes aktuilis 
erteke nem a 0...2S5 tartominyba esik 

- ASC vagy STRINGS fuggveny karakteres argumentumakent 
megadott karaktersorozat egyetlen karaktert sem tar- 
talmaz 

- CHRI, INP, LEFTI, MIDI, RI6HTI vagy STRINGS fuggvenyek 
numerikus operandusinak aktuilis erteke nem a 0...255 
tartominyba esik 

- OUT es POKE utasitisban megadott adatbyte nem esik a 
0. . .255 tartominyba 

- a POINT fuggvenyben vagy a RESET es SET utasitisban 
megadott x-, vagy y-koordinita kivul esik a megenge- 
dett tartominyon 

- PRINTS utasitisban a megadott sor-, vagy oszlopcim nem 
esik a megengedett tartominyba 
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- TAB fuggveny argumentuma nagyobb f mint 41 

- LOG fuggveny argumentuma kisebb, vagy egyenlo nul Laval 

- RND vagy SCR fuggveny argumentuma kisebb* mint nulla 

6 OV Overflow TftlcsordulAs 

Valamely ar itmetikai muvelet eredmenye a PRIMO BASIC 
aktuAlis szAmAbrAzoLAsi tartomAnyAban nem AbrAzolhat6. A 
megengedett tartomAny egesz tipusu szAmAbrAzolAs eseten 
-32768... 32767, egyszeres- es duplapontos valos szAmok 
alkalmazAsakor pedig +1.70141E+3B. 

(Ha a muveletvegzes sorAn alAcsordulAs kovetkezik be, 
akkor a PRIMO az eredmenyhez zerus erteket rendel es a 
program vegrehajtAsAt hibajelzes nelkul folytat ja. ) 

7 OH Out of Hemory Betel t a memoria 

A rendelkezesre AU6 memoria nem elegendo a BASIC prog- 
ram szamara. Ennek okai a kovetkezdk lehetnek: 

- tul nagy a BASIC program 

- tul sok skalAr vAltozdt, es tilsAgosan nagy meretu 
tomboket alkalmaztunk 

- tul sok FOR ciklust es szubrutinhivAst agyaztunk egy- 

masba 

- tulsAgosan bonyolult aritmetikai kifejezest alkalmaz- 
tunk 

8 UL Undefined Line NemdefiniAlt sor 

A 60SUB, BOTO, IF-THEN-ELSE, ON ERROR GOTO, ON SOSUB, ON 
GOTO, RESTORE, vagy RESUME utasitasban, vagy az EDIT es 
RUN parancsban megadott sorszAmu sor nem talalhat6 a 
memoriAban tArolt BASIC programban. 

9 BS Bad Subscript Hibas index 

Egy tombvaltozft valamelyik indexenek aktualis erteke 
meghaladja e tomb dimenzionalasakor meghatarozott maxi- 
milis erteket, vagy egy tomb dimenzionalasakor olyan 
nagy indexerteket adtunk meg, hogy a tomb tArotAsAra 
nines mar elegendo memdriahely, vagy kevesebb, ill. tobb 
indexet adtunk meg, mint a tomb dimenzionalasakor . 

10 DD Double Dimensioned Tomb ujradimenzionAlAs 

Egy korabban mar dimenzionalt tombvaltozot kisereltunk 
meg ismet dimenzionalni, vagy egy korAbban meg nem di- 
menzionAlt, de mAr felhasznAlt tombot akartunk ujradi- 
menzionAlni. (Ez utdbbi eset azert vAlt ki hibajelzest, 
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mert ha a PRIMO egy meg nem dimenzionAlt tombot eszlelr 
agy azt automat ikusan dimenzionAl ja» ten At a kesobbiek- 
ben ez a tombnev mar nem szerepelhet a DIM utasitAsban. ) 

11 /0 Division by Zero Null Aval osztAs 

Az osztAs muveletben az bszto aktuAlis erteke nulla, 
vagy hatvAnyozAsnAl negativ hatvAnykitev* mellett az 
aLap aktualis erteke nulla. 

12 ID Illegal Direct Direkt i»6dban nem alkalmazhato 

INPUT vagy INPUT! utasitast direkt modban pr6baltunk 
alkalmazni. Az' INPUT utasitAs mindket fajtAja csak prog- 
ramb6l hajthat6 vegre. 

13 TN Type Hismatch Tipuskeveredes 

Egy karakteres vAltozohoz numerikus erteket f vagy egy 
numerikus vAltozohoz karakteres erteket pr6bAltunk ren- 
delnir ill. egy numerikus fuggvenyargumentum helyen 
karakteres erteket szolgiltatd kifejezes, vagy egy ka- 
rakteres argumentum helyen numerikus erteket ado kifeje- 
zes all. 

14 OS Out of String Space Betelt a karakterterulet 

A PRIHO karaktersorozatok tArolAsAra elkulonitett mem6- 
riaterulete betelt. A hibAt a karakterterulet meretenek 
megnovelesevel - CLEAR utasitAs - kuszobolhetjuk ki . 

15 LS Long String Hossza karaktersorozat 

Karaktersorozatok osszef&zese - konkatenAcio - sorAn 255 
karakternel hosszabb karaktersorozat keletkezett. 

16 ST String Formula Too Complex TalsAgosan bonyolult 

karakteres ki f ejezes 

A karaktersorozatokat tartalmaz6 kifejezes talsAgosan 
bonyolult a PRIHO szAmAra. A kifejezest ket vagy tobb 
reszre bontva kell a BASIC programban megadni. 

17 CN Can't CoNtinue Nem folytathato 

A CONT paranccsal megkisereltiik a BASIC program tovAbb- 
inditAsAtr de: 

- a memoriAban nines BASIC program 

- a BASIC program hibajelzessel Allt le 
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- a program leAllitAsa es CONT paranccsal megkiserelt 
ajrainditAsa kozott eltelt iddben modositottuk a memo- 
riAban tArolt BASIC programot. 

18 NR No RESUME LezAratlan hibakezeles 

Mikozben egy programozott hibakezeld rutin vegrehajtAsa 
folyikf a PRIMD elerte a program utols6 sorAt azeldtt, 
hogy egy RESUME utasitAs elofordult volna. 

19 RW RESUME Without Error Hiba nelkuli RESUME 

A PRIMD programozott hibakezelo rutinon kivul egy RESUME 
utasitAst talAlt a BASIC programban. 

20 UE User Error FelhasznAl6i hiba 

A PRIMD olyan hibAt eszlelt, amelyhez new tartozik szab- 
vAnyos hibauzenet. Ezt a hibajelzest olyan ERROR utasi- 
tAs vegrehajtAsa eredmenyezi, amelyben a megadott hiba- 
kod nagyobbf mint 23. 

21 MD Missing Operand HiAnyzo operandus 

Egy kifejezesben a maveleti jelet nem koveti operandus. 

22 FD File Description AllomanyleirAs hiba 

FD hibajelzes a magnetofonos adatkezeles alkalmazAsa 
sorAn keletkezhet. A hibajelzest kivAlto okok a kovetke- 
zdk: 

- A BASIC programban CLOSE utasitAs kovetkezik, mikozben 
nines megnyitott adatAllomAny 

- PRINT* utasitAst alkalmaztunk anelkul, hogy CREATE 
utasitAssal az adatAllomAnyt megnyitottuk volna 

- INPUT* utasitAst alkalmaztunk agy f hogy az adatAllo- 
mAnyt korAbban OPEN utasitAssal nem nyitottuk meg 



BArmely, az eldzdekben fel nem sorolt hibakod megjelenese egy 
ERROR utasitAsban az UE hibajelzes megjeleneset eredmenyezi. 
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A kovetkezdkben nevsorba rendezve felsoroljuk a PRIMO BASIC 
hibajelzesek emlekeztetd k6djait, a hozzajuk rendelt belso hiba- 
kodot es az emlekeztetd k6dnak megfelelo hibaszovegeket. 



BS 
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CN 


17 


DD 


10 


FC 
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FD 


22 


ID 


12 


LS 


15 


HO 


21 


NF 
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NR 
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OD 
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OH 
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OS 
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OV 
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RG 


3 


RU 


19 


SN 
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ST 


16 


TM 


13 


UE 


20 


UL 


8 


/O 


11 



Bad Subscript 

Can't Continue 

Double Dimensioned 

Illegal Function Call 

File Description 

Illegal Direct 

Long String 

Missing Operand 

NEXT without FOR 

No RESUME 

Out of Data 

Out of Memory 

Out of String Space 

Overflow 

RETURN without GOSUB 

RESUME without ERROR 

Syntax Error 

String Formula Too Complex 

Type Mismatch 
User Error 
Undefined Line 
Division by Zero 



Hibas index 

Nem folytathat6 

Tomb ujradimenzionalas 

Illegalis funkciohivas 

Allomanyleiras hiba 

Direkt modban nem alkalmazhat6 

Hosszu karaktersorozat 

Hianyzo operandus 

FOR nelkuli NEXT 

Lezaratlan hibakezeles 

KimerQlt a DATA-lista 

Betel t a memdria 

Betelt a karakterterulet 

Tulcsordulas 

GOSUB nelkuli RETURN 

Hiba nelkuli RESUME 

Formai hiba 

Tulsagosan bonyolult 

karakteres kifejezes 

Tipuskeveredes 

Felhasznaldi hiba 

Nemdefinialt sor 

Null aval osztas 
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PRIHO karakterkodok 



A PRIHO a 7 bites ASCII - American Standard Code for Inform- 
ation Interchange - k6drendszer szabvAnyos sved kiter jesztesebdl 
kialakitott k6drendszert alkalmazza. Ennek megfeleloen az ekeze- 
tes betttk egy resze -AAefedOQO -a kodrendszerben igy 
helyezkedik el, ahogy azt az ASCII sved kiter jesztese eloirja, 
mig a magyar ABC hosszfi ekezetes bet&i nehAny - a PRIMO Altai nem 
hasznAlt - speciAlis karakter - <? I \ 3 «- C I ) * - helyere 
kerultek. Ezzel a megoldAssal elertuk, hogy a csak rovid ekezetes 
karakter eket tartalmaz6 szoveg mindazon nyomtatoval helyesen 
megjelenithetd, amely ismeri az ASCII k6drendszer sved kiterjesz- 
teset . 

A PRIHO nehAny kulonleges karakter megjelenitesere is kepes. 
Ezek a karakterek a FelhasznAld Altai definiAlhatd karakterkodok 
egyiken helyezkednek el, igy ij karakterek definiAlAsa utAn mAr 
nem hasznAlhatok. 

A kovetkez6kben ket tAblAzatba rendezve felsoroljuk a PRIHO 
valamennyi megjelenithet6 karakteret. Az elsd tAblAzatban a ka- 
rakterek decimAlis kddjuk, a mAsodikban hexadecimAlis k6djuk 
szerint rendezettek. (A vezerl6 karakterek k6djai es ertelmezese 
az F-9 oldalon kezdodfi fejezetben talAlhat6. ) 

Megjelenitheto karakterek decimAlis kodjai 
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A 128... 151 kddi karakterek csak akkor alkalmaz- 
hat6k, ha nem definiAltunk tj karaktereket. 



Cljonnan definiAlt karakterek k6dja a 
tartomAnyba eshet. 



128.., 255 
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Megjelenithetd karakterek hexadecimal is k6djai 
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A 80H. ..97H kddi karakterek csak akkor alkalmaz- 
hat6k f ha nem definialtunk ij karaktereket. 

Cljonnan definialt karakterek k6dja a 80H...0FFH 
tartomanyba eshet . 
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Vezerld karakterek es ertelmezesuk 



A PR I MO kddrendszereben a 1...25 decimilis - 1...19H hexade- 
cimal is - kdd& karakterek vezerld karakterek. E k6dokhoz nines a 
kepernydn megjelend karakter rendelve, alkalmazisuk eseten csak a 
vegrehajtott funkcid eredmenye Lit hat 6. 

A kdvetkezdkben felsoroljuk a PRIMO vezerld karaktereinek 
decimilis es hexadecimilis kodjait, az egyes kodok jelenteset* 
vat ami nt azt a billentyfit/bil lentyftket, amely/amelyek megnyomisa 
az adott vezerld kddot eredmenyezi. 

dec hex billentyO. funkcid 

01 01 Normal 

Hatisira a kepernyd kezeld program a tovibbiakban normal 
uzemmddban makddik tovibb. Ennek megfelelden vizszin- 
tesen f fekete hitterre feher, normil mereta betftket fog 
eldtdrles nelkul megjeleniteni. <Ezt a k6dot nem lehet a 
billenty&zetrdl begepelni. A BASIC programban a PRINT 
CHRS(l) utasitissal vilthatd ki . ) 

02 02 CTR/B Ny&jtott mereta karakter megjelenites 

Megadisa utan a kepernydre kiirt karakterek vizszintes 
irinya merete a normal 6 keppont helyett 12 keppont 
lesz. Ennek megfelelden a kepernyd egy soriban 42 karak- 
ter helyett 21 nyujtott karakter irhatd ki. A kepernydn 
mar I it hat 6 karakterek nem viltoznak meg. 

03 03 CTR/C Feher kepernyd alapszin beillitisa 

Alkalmazisinak hatisira a kepernyd alapszine feher lesz. 
E kdd megadisa eldtt a kepernyore kiirt karakterek i ri- 
ver til tan tovibbra is lithatdk. 

04 04 CTR/D Inverz karakteralap beillitisa 

Megadisa utan a kepernyore kiirt karakterek a kepernyd 
aktuilis alapszinehez kepest invertilt karakteralapon 
jelennek meg, vagyis fekete alapszin eseten feher karak- 
teralapon fekete jelek, feher alapszin eseten fekete 
karakteralapon feher jelek lithatdk. A kepernydn mir 
lithatd karakterek nem viltoznak meg. 
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05 05 CTR/E Karakter a I Ah dz As bekapcsolAsa 

MegadAsa utAn. a kepernyore kiirt karakterek alAhazva 
fognak megjelenni. A keperny6n mar LAthatd karakterek 
nem vAltoznak meg. 

06 06 CTR/F Eiatdrlfcs bekapcsolAsa 

A vezerlo kod megadAsa utAn a PRIMO egy karakter megje- 
leniteset megelozden a karakteralap 6»i2 - nyajtott 
karakter eseten 12*12 - keppontjAt a kepernyfi aktuAlis 
alapszinevel megegyezo szinare Allitja es csak ezutAn 
jeleniti meg a karakter alapon a kivAnt betftt, szAraot 
vagy irAsjelet. Az eldtorles alkalmazAsAval elerhetfi, 
hogy a kepernyd valamely poziciojAban az ott korAbban 
megjelenitett karaktert egy ilj jellel felulirjuk. 

07 07 CTR/G Hangjelzte 

A 7-es vezerlo karakter hatAsAra a PRIMO hangszor6ja egy 
1/6 mAsodperc hosszasAgii 800 Hz frekvenciAjii hangot ad. 

08 08 «- Utolso karakter torlese 

A vezerld k6d alkalmazAsa eredmenyekent a PRIMO a kurzor 
aktuAlis pozici6jAt6l balra Alio karaktert tor Li a kep- 
ernyorol, majd a kurzort a letorolt karakter helyere 
Allitja. Ha a kurzor egy sor legelso pozici6jAban volt, 
akkor az el6z6 sor utolsd karaktere tdrlddik. Amennyiben 
a kurzor a legels6 - legfelso - sor els6 poziciojAban 
All, a vezerlo kod hatAstalan. 

09 09 SHIFT/-* Vizszintes tabulAtor 

HatAsAra a kurzor a sor kovetkezo, nyolccal maradek 
nelkul oszthato oszlopszAmi pozicidjAra lep eL6re. Ha az 
adott sorban nines mAr ilyen pozici6, a kurzor a kovet- 
kez6 sor elsd pozici6jAba kerul. (Ez a vezerlo kod egy 
BASIC program-, ill. adatsor begepelesekor nem alkalmaz- 
hat6. A PRINT utasitAsban azonban CHRSO) alakban megad- 
hato. ) 

10 0A i BASIC EDITOR ftjrainditAsa 

Ez a vezerld k6d csak a BASIC EDIT parancsAnak alkalma- 
zAsakor hasznAlhatd. HatAsAnak reszletes leirAsa a PRIMO 
BASIC nyelv leirAsAban talAlhat6. 
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12 OC CLS Kepernyd tortus 

MegadAsa utAn a kepernyd tartalma tdrlddik es valamennyi 
keppont szine a kepernyd aktuAlis alapszinevel lesz 
azonos. A vezerld kdd a kurzort a I eg f elsd sor elsd 
pozicidjAba Allitja es kikapcsolja az eldtdrlest. 

13 OD RETURN Kocsi vissza + sor erne I es 



HatAsAra a kurzor a kovetkezd sor elsd pozicidjAba all. 
Ha a kurzor a kepernyd Legal so sorAban volt, akkor a kep 
utolsd 15 sora egy sorral feljebb lep - vagyis a legelsd 
sor tartalma eltanik az ernydrdl - t es a kepernyd legal- 
s6 soraban egy ures sor jelenik meg. A kurzor ezen Qres 
sor elsd pozicidjAba kerul. 

14 OE CTR/N Kurzor a sor elejere 

AlkalmazAsa eseten a kurzor azon sor elsd pozicidjAba 
lep, amely sorban eppen tartdzkodott. 

15 OF CTR/O Fuggdleges iras 

MegadAsa utan a PRIMO kepernydkezeld programja a megje- 
lenitendd karaktereket az dramutatd jArAsAval ellenkezd 
irAnyban 90 fokkal elforgatva, fuggdlegesen irja ki. A 
kepernydn mar I At hat 6 karakterek nem vAltoznak meg. 

Fuggdleges iris eseten a kepernydn 21 sor, soronkent 32 
karakter jelenithetd meg. Ebben az uzemmddban hatAstalan 
az "Utolsd karakter tor lese", "Vizszintes tabulator", 
"Kocsi vissza + soremeles" es "Kurzor a sor elejere" 
vezerld kdd. Fuggdleges iras uzemmddban a kurzor a sor 
vegerdl nem a kovetkezd, hanem az aktuAlis sor elejere 
lep. Igy egy sornal - 32 karakter - hosszabb szdveg 
megjelenitese ertelmesen nem lehetseges. 

Fuggdleges iris eseten is alkalmazhatd a direkt kurzor 
cimzes - PRINTS utasitas -. Ilyenkor azonban a megadhatd 
sor-, es oszlop cimek a megvAltozott kepmeretek miatt a 
vizszintes irasnal megszokottaktdl elterdek. A lehetse- 
ges sor cimek a 0...20, az oszlop cimek a 0. ..31 tarto- 
manyba esnek. A 0-as cima sor a kep bal szelen he- 
lyezkedik el, a 0-as cima oszlop a kep aljAn. 

16 10 CTR/P Alsd index 

MegadAsa utAn a kepernydre kiirt karakterek 4 kepponttal 
- 1/2 karaktermeret - lejjebb csasztatva jelennek meg. A 
vezerld kdd ismetelt alkalmazAsa ajabb 4 keppont os lefe- 
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le csusztatist eredmenyez. Ha az als6 indexbe irt karak- 
terek egy resze mar tulnyulik a kepernyd alsd szelen* a 
karakterek e tulnyuld reszet a PRIMO neu jeleniti meg. A 
kepernydn mir lithatd karakterek nem viltoznak meg. 

17 11 CTR/Q Felsd index 

Megadisa utin a kepernydre kiirt karakterek 4 kepponttal 
- 1/2 karakter meret - feljefab csusztatva jelennek meg. A 
vezerld k6d ismetelt alkalmazasa ujabb 4 keppontos fel- 
fele csusztatist eredmenyez. Ha a felsd indexbe irt 
karakterek egy resze mir tulnyulik a kepernyd felsd 
szelen, a karakterek e tulnyuld reszet a PRIMO nem 
^ jeleniti meg. A kepernydn mar I at hat 6 karakterek nem 

valtoznak meg. 

18 12 CTR/R Normil meretft karakter megjelenites 

Ez a vezerld kdd a "Nyujtott meretfl. karakter megjeleni- 
tes" kod hatisit szunteti meg. Alkalmazasa utin a keper- 
ny6re kiirt karakterek vizszintes irinyu merete a normi- 
lis £ keppont lesz. A kepernydn mir I at hat 6 karakterek 
nem viltoznak meg. 

19 13 CTR/S Fekete kepernyd alapszin beillitasa 

Ez a vezerlo kod a "Feher kepernyd alapszin beallitisa" 
kid hatisit szunteti meg. Alkalmazasa utin a kepernyd 
alapszine fekete lesz. E kdd megadisa eldtt a kepernydre 
kiirt karakterek invertiltan tovibbra is lithatok. 

20 14 CTR/T Inverz karakteralap kikapcsolisa 

Ez a vezerld kod az "Inverz karakteralap beillitisa" kod 
hatisit szunteti meg. Alkalmazasa utin a karakterek a 
kepernyd aktuilis alapszinenek meg f el eld karakter alapon 
jelennek meg. A kepernydn mir I it hat 6 karakterek nem 
viltoznak meg. 

21 15 CTR/U Karakter alihuzis kikapcsolisa 

Ez a vezerld kdd a "Karakter alihuzis bekapcsolisa" kdd 
hatisit szunteti meg. Alkalmazasa utin a kepernydre 
kiirt karakterek alihuzis nelkul jelennek meg. A keper- 
nydn mir lithatd karakterek nem viltoznak meg. 

22 16 CTR/V El dt dries kikapcsolisa 

Ez a vezerld kdd az "Eldtdrles bekapcsolisa" kdd hatisit 
szunteti meg. Alkalmazasa utin a PRIMO egy karakter 
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megjelenitesekor nem torli a karakteralapot, hanem a 
kiirandd bet&t, szAmot vagy irAsjelet a kepmezd korAbbi 
tartalmAra rAirja. Igy elerhet6 r hogy a kepernyd vala- 
mely pozici6jAban ket karakter egymAsra iras Aval egy Hj 
jelet hozzunk letre. A PRIHO alaphelyzetben - es a 
"Kepernyd torles" k6d megadAsa utan - kikapcsolt elotor- 
l esse I uzemel. 

23 17 CTR/W Vizszintes iras 

Ez a vezerld kod a "Fuggfi leges iras" k6d hat As At szunte- 
ti meg. AlkalmazAsa utan a PRIMO ismet vizszintesen irja 
ki a megadott karaktereket. A fuggdleges megjelenites 
sorAn nem ertelmezett vezerld kodok ismet m&kodesbe 
hozhatok. A kepernyon mar L At hat 6 karakterek nem vAltoz- 
nak meg. 

24 18 SHIFT/<- Sorszerkesztes djrakezdese 

Ez a vezerld kod csak a BASIC EDIT parancsAnak alkalma- 
zAsakor hasznAlhato. Hat As Ana k reszletes leirAsa a PRIMO 
BASIC nyelv leirAsAban talAlhat6. 

25 19 SHIFT/-* Sorszerkesztes lezArAsa 

Ez a vezerlo k6d csak a BASIC EDIT parancsAnak alkalma- 
zAsakor hasznAlhato. HatAsAnak reszletes leirAsa a PRIMO 
BASIC nyelv leirAsAban talAlhat6. 
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Bi I lent yak periferia cimei 



A PRIMO szamitogep a bil lenty&zet egyes gomb j ait egy-egy pe- 
ri f^riak^nt kezelir igy mindegyik gomb sajat periferia cimmel 
rendelkezik. A kovetkezd ket tablazatban a periferia cimek novek- 
v6 sorrendjeben, ill. a gombok Altai kepviselt karakterek ABC 
sorrendjeben megadjuk az egyes gombok decimal is es hexadecimal is 
periferia cimeit. 

A periferia cimek ismereteben egy gomb allapota akar BASICr 
akar gepi kodu program segitsegevel ellendrizheto. Ha a gombot 
BASIC programmal vizsgaljuk? az INP fuggvenyt alkalmazhatjuk. 

Pelda: 100 IF INP(53) AND 1=1 THEN PRINT "CLS aktiv" 

A peldaban az INP fuggveny erteket azert kell logikai 
tS mftvelet segitsegevel maszkolni r mert az INP fuggveny 
altal szolgiltatott 8 bites erteknek csak a legkisebb 
helyierteka bitje jelkepezi a gomb pillanatnyi allapo- 
tat, mig a tobbi bit mas jelentessel bir. 



Billentyu cimek periferia cim szerint rendezve 

dec hex gomb dec hex gomb dec hex qoae 



00 


00 


Y 


23 


17 


7 


/ 


43 


2B 


. : 


01 


01 


t 


24 


18 


H 




44 


2C 


M 


02 


02 


S 


25 


19 


Betukoz 


45 


2D 


S ; 


03 


03 


SHIFT 


26 


1A 


B 




46 


2E 


I 


04 


04 


E 


27 


IB 


6 


& 


47 


2F 


' » 


05 


05 


UPPER 


28 


1C 


G 




48 


30 





06 


06 


W 


29 


10 


5 


X 


49 


31 


» * 


07 


07 


CTR 


30 


IE 


V 




50 


32 


P 


08 


08 


D 


31 


IF 


4 


S 


51 


33 


& a 


09 


09 


3 * 


32 


20 


N 




52 


34 





10 


0A 


X 


33 


21 


8 


( 


53 


35 


CLS 


11 


0B 


2 " 


34 


22 


Z 




55 


37 


RETURN 


12 


OC 


Q 


35 


23 


+ 


? 


57 


39 


«- 


13 


0D 


1 ! 


36 


24 


U 




58 


3A 


£ 


14 


0E 


A 


37 


25 





= 


59 


3B 


6 6 


15 


OF 


i 


38 


26 


J 




60 


3C 


A 


16 


10 


C 


39 


27 


> 


< 


61 


3D 


-» 


18 


12 


F 


40 


28 


L 




62 


3E 





20 


14 


R 


41 


29 


- 


i 


63 


3F 


BRK 


22 


16 


T 


42 


2A 


K 
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Billentytt ci»ek a karakterkddok sorrendj*be rend*zve 



gomb 


dec 


hex 


gomb 


dec 


hex 


gomb 


dec 


hex 


u 


43 


2B 


C 


16 


10 


T 




22 


16 


t- 


57 


39 


D 


08 


08 


U 




36 


24 


+ ? 


35 


23 


E 


04 


04 







48 


30 


t 


01 


01 


k 


58 


3A 


ii 


a. 


51 


33 


4 


15 


OF 


F 


18 


12 


V 




30 


IE 


- i 


41 


29 


6 


28 


1C 


u 




06 


06 


-» 


61 


3D 


H 


24 


18 


X 




10 


0A 


, ; 


47 


2F 


I 


46 


2E 


Y 




00 


00 


> < 


39 


27 


J 


38 


26 


Z 




34 


22 


' » 


49 


31 


K 


42 


2A 





= 


37 


25 


Betftkoz 


25 


19 


L 


40 


28 


1 


t 


13 


OD 


BRK 


63 


3F 


H 


44 


2C 


2 


H 


11 


OB 


CLS 


53 


35 


N 


32 


20 


3 


t 


09 


09 


CTR 


07 


07 





52 


34 


4 


s 


31 


IF 


RETURN 


55 


37 


6 6 


59 


3B 


5 


% 


29 


ID 


SHIFT 


03 


03 





62 


3E 


6 


* 


27 


IB 


UPPER 


05 


05 


P 


50 


32 


7 


/ 


23 


17 


A 


14 


0E 


Q 


12 


OC 


8 


( 


33 


21 


A 


60 


3C 


R 


20 


14 


9 


) 


45 


2D 


B 


26 


1A 


S 


02 


02 











A PRIHO billentyftzeten a kovetkezo periferia cimekhez nines 
gomb kapcsolva: 

decimal is 17, 19, 21, 54, 56 
hexadecimilis 11, 13, 15, 36, 38 
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Felhaszn4l6i karakterek defini4L4sa 



A PRIHO lehetftve teszi, hogy a Felhaszn4l6 iij, a gep altal 
meg ismeretlen karaktereket hozzon letre f melyek defini4l4suk 
utan a szabv4nyos jelekhez hasonldan alkalmazhat6k. A kovetkezdk- 
ben reszletesen ismertetjuk a karakterek definiilasahoz szukseges 
alapfogalmakat. 

A Felhaszn4l6 altal definialt karakterek k6djai a 128... 255 
interval Lumba eshetnek. Igy egy id6ben maximal isan 128 £ij karak- 
ter alkalmazhat6. Amint az a PRIHO karakterk6djait ismertetd 
Fuggelekb6l is I4that6 f a 128. ..151 k6dok definialtak, azok al- 
kalmazasa eseten a Fuggelekben tal4lhat6 karakterek Jelennek meg 
a kepernydn. (Ha a 152. ..255 kodok valamelyiket meg definialasa 
elfitt alkalmazzuk, a kepernyfin a kovetkezd karakter helyen egy 
ertelmetlen alakzat fog megjelenni.) Ha kihasznaljuk a karakter 
definialas lehetftseget, az emlitett 24 karaktert vagy ftjra defi- 
nialjukt vagy alkalmaz4sukr6l le kell mondanunk. Ennek az az oka> 
hogy Felhaszn4l6i karakterdefinici6 eseten a 128... 151 kodokon 
koribban elhelyezkedd karaktereket a PRIHO "elfelejti". 

A PRIHO normal meretft karakterei vizszintesen 5, fuggdlege- 
sen 8 keppont kiter jedesftek. Az 5*8 pont egy 6«12 pontbol 4116 
mezdben helyezkedik el. Mivel a PRIHO keperny6je 256«192 keppont 
kiterjedesti igy egy i dob en 16 sorban, soronkent 42 karakter 
jelenitheto meg. Egy karakter a rendelkezesere 4116 mezdben a 
kovetkezd modon helyezkedik el: 




Az egym4s mellett 4116 karakterek 
elv4laszt4s4t a baloldali karakter 
6. pontoszlopa biztositja, amely 
4ltal4ban nem tartalmaz aktiv pon- 
tokat. 

A sorok elv4laszt4s4t az 4ltal4ban 
aktiv pontokat nem tartalmaz6 1. 
es 10-12. karaktersorok biztosit- 
j4k. 



Mivel az egyes karaktereket elv4laszt6 pontok is aktiviz4l- 
hat6k, igy lehetseges vizszintes f ill. fugg6leges irAnyban ossze- 
fuggo alakzatok letrehozAsa is. Ilyenkor tobb, megfeleloen meg- 
szerkesztett karakter egyuttesen alkothat egy alakzatot. 
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Amikor a kepernyokezelG program egy karaktert a kepernyore 
rajzol, kikeresi a PRIMO ROM-jAban elhelyezkedo karaktergenerAtor 
teruletrol a megfelelo alakzat pontmintAzatAt. Ez egy karakter en- 
kent 8 byte-os terulet, amely meghatArozza, hogy mely pontokat 
kell kigyCijtani, ill. eloltani az 5*8 pont kozul annak erdekeben, 
hogy a keperny6n a kivAnt beta, szAm vagy irAsjel megjelenjen. 

A pontmintAzat minden byte-ja a karakter egy sorAt hatArozza 
meg. Mint emlitettuk, egy karaktermezo 6 pont szeles es 12 pont 
magas. Egy sor meghatArozAsAhoz a byte 6 bitje szukseges tehat. 
Az 1. oszlopot a 6-os bit, a 2. oszlopot az 5-6s bit, mig az 5. 
oszlopot az 1-es bit jelkepezi. <A byte bal szelso bitje a 7-es, 
jobb szelso bitje a O-As sorszAmil. ) A megmaradt ket bit - 7-es es 
O-as - kulonleges celokat szolgAt. 

Ha a karakter 1. sorat meqhatArozo byte 7-es bitjeben 1 all, 
a ir^rirtAr i'm. \iil Lvesztett betfi. Ilyen pi. az y vagy a j. Az 
ilyen karaktereket a kepernydkezelo program a 6*12 pontbol 4116 
mezoben nem a 2. sortol, hanem a 4. sort6l kezdve jeleniti meg. 
Ennek megfelel6en a karakter legalso sora a mezd 11. sor Aba 
kerul. Ezzel a megoldAssal elerheto, hogy egy nyomtatott vagy 
irott szoveghez hasonldan a sullyesztett karakterek egyes reszei 
az irAsvonal alA nyilva jelenjenek meg, de ezek a karakterek sem 
igenyelnek 8 byte-nAl hosszabb pontmintAzatot. A karakter tovAbbi 
sorait meghatArozd byte-ok 7-es bitjeinek erteke kozombos. 

A 7-es bithez hasonl6an a O-As bitet is ktildnlegesen ertel- 
mezi a kepernyokezelft program. Ezzel a bittel j elezzuk a program 
szAmAra, hogy kirajzo lta mAr a karakter leqals6 sorAt, nem kell 
flijabb sort meghatAroz6 byte-ot olvasni a karaktergenerAtor teru- 
letrol. Ez a megoldAs azt az elonyt nyajtja, hogy 8 pontnAl 
magasabb karaktereket is alkalmazhatunk. Igy pi. tobb soron 
Atnyal6 integrAljel is megjelenitheto. Ez agy oldhatd meg, hogy a 
karakter nyolcadik sorAt jelkepezo byte O-As bitjebe is O-At 
irunk, igy a program nem fejezi be a karakter megjeleniteset, 
hanem tovAbbi sorokat rajzol mindaddig, amig az alakzat veget 
jelzd bit erteke 1 nem lesz. Ekkor azonban a kulonleges karakter 
kodjAt kovetd kodot - kidokat - elveszitjuk, hiszen az azok meg- 
jelenitesehez szukseges 8 byte-os mezdt - mezdket - a kulonleges 
karakter pontmintAzata reszenek tekinti a kepernyokezelo program. 

A karaktergenerAtor szervezese lehetfive teszi, hogy ket 
egymAs melle irt jel osszefuggo alakzatot alkosson. Ez annak 
koszonheto, hogy mig a pontmintAzat hat pont szeles, maga a 
karakter tipikusan csak a bal szelsd 6t pontot foglalja el. Ha 
ebben a 6. oszlopban is van a karakternek aktiv pontja, nem leven 
mAr elvAlasztd mezo, a szomszedos karakterek egybefolynak. Az 
elftzftekben leirtak figyelembe vetelevel vizsgAljuk meg pi. az A 
beta kepet megad6 8 byte-os karaktergenerAtor-mez6 felepiteset es 
az egyes byte-ok decimAlis erteket: 
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byte bit 76543210 decimAlis ertek 



1. 











1 














16 


2. 








1 


1 


1 











56 


3. 





1 





1 





1 








84 


4. 





1 











1 








68 


5. 





1 


1 


1 


1 


1 








124 


6. 





i 











1 








68 


7. 





1 











1 








68 


8. 





1 











1 





1 


69 



A karaktergenerAtor-mezo felepitesenek megismerese utan 
vizsgAljuk meg, hogyan lehetseges az ijonnan definiAlt karakterek 
alkalmazAsa. Ezt vegso soron az teszi lehetdve, hogy a kepernyo- 
kezelo program a 128... 255 kddii karakterek pontmintazatat jelke- 
pezo karaktergenerAtor-mezo kezdocimet a PRIMO rendszervAltoz6i- 
nak fenntartott RAM-teruleten orzi. Igy e mez6 kezd6cime szabadon 
valtoztathato. Ha az ismertetett szabAlyok figyeLembe vetelevel 
pi. a BASIC programteruleten letrehozunk egy, az lij karakterek 
pontmintazatat tartalmaz6 karaktergenerator teruletet, es a rend- 
szervAltozo terulet megfelelo cimere - 16459-16460; 404B-404C - 
elhelyezzuk ezen teriilet kezdocimet, akkor a kepernydkezelo prog- 
ram a 128... 255 kodll karakterek kepet errol a helyr6l fogja 
megjeleniteskor kiolvasni. 

Az eddig leirtak illusztrAlAsAra az alAbbiakban vegezzuk el 
egy FelhasznAldi karakter megtervezeset es definiAlAsAt. 
Peldakent vAlasszunk egy olyan alakzatot, amely egy 16 hAtAn ul6 
lovast abrazol. A pontmintAzat tervezesekor hamar kiderul, hogy 
kielegitd AbrAt csak 6 pontnAl szelesebb, 8 pontnAl magasabb 
alakzat eseten kapunk. Az eddig leirtak alapjAn ez nem okoz 
problemAt, mivel - tobb karakterk6d felhasznAlAsAval - a PRIMO 
kepes a szukseges meretOi alakzat megjelenitesere is. Ezert nem 
egy, hanem ket karaktert kell definiAlnunk. Ezek kozul az els6 az 
Abra bal felet, a mAsodik a jobb felet AbrAzolja. Mindket karak- 
tert a szokAsos 8 pontnAl magasabbra tervezzuk. A kitftzott celt 
megval6sito egy lehetseges alakzat - amely 12»10 pontb6l All - a 
kovetkezo lehet: 
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Az AbrAnak megfeleld karaktergenerAtor-mezd decimAlis k6djai 
a kovetkezdk: 



Bal oldal 


byte 


dec . kdd 


Jobb 


oldal 


byte 


dec . k6d 




1. 









1. 







2. 









2. 


32 




3. 


2 






3. 


68 




4. 


2 






4. 


108 




5. 


62 






5. 


126 




6. 


94 






6. 


120 




7. 


30 






7. 


120 




8. 


20 






8. 


20 




9. 


36 






9. 


36 




10. 


35 






10. 


35 



Az Abra bal oldal At jelkepezd karakter k6djAnak vAlasszuk a 
128-as kodot. Mivel a definiAlt Abra 8 pontnAl magasabb, ez azt 
eredmenyezi, hogy a definici6val a 129-es k6dot is elfoglaltuk. 
Ezert az Abra jobb oldal At a 130-as kdd kepviselheti, amely 
termeszetesen elfoglalja meg a 131-es k6dot is. Ezek utAn a 
teljes AbrAt leifd karaktergenerAtor-mezo a kovetkez6: 

128.129 kod = 0, 0, 2, 2, 62, 94, 30,20,36,35, x,x,x,x,x, x 
130.131 kod = 0,32,68,108,126,120,120,20,36,35 

(A 128.129 kodhoz tartoz6 erteksor vegen lAthato 6 db x a 129-es 
kodhoz tartozd karaktergenerAtor-mezo fel nem hasznAlt 6 byte-nyi 
reszet jelkepezi. E byte-ok megadAsa azert szukseges, hogy a 
keperny6kezel6 program a 130-as kodCi karakter elejet megtalAlhas- 
sa, vagyis minden karakter kodhoz 8 byte-nyi teruletet kell defi- 
niAlni meg akkor is, ha azt tenylegesen nem is hasznAljuk ki. Ez 
al6l csak a legmagasabb k6dd definiAlt karakter kivetel, amelynek 
nem hasznAlt sorait jelkepezo byte-ok megadAsa nem kotelezd. A 
kihasznAlatlan - x-el jelolt - byte-ok erteke tetszdleges lehet.) 

Az elkeszitett Abra programbeli definiAlAsAt es alkalmazAsAt 
szemlelteti a kovetkezd oldalon lAthato bemutatd program. 

A program 120-as sorAban 4U6 DIM utasitAssal lefoglalt Kx 
vektor tArolja majd a definiAlt karakterek pontmintAzatAt. A C 
skalAr vAltoz6 a karaktergenerAtor-mezd kezdocimet 6rzi. 

Ha az <xj karakterek pontmintAzatAt tArol6 karaktergenerAtor- 
mezdt egy BASIC tombvAltozoban - jelen esetben a Kx vektorban - 
helyezzuk el, akkor a program helyes m&kodesenek erdekeben bizto- 
sitani kell, hogy a tomb kezddcimenek meghatArozAsAt vegzd VARPTR 
fuggveny alkalmazAsa utAn a programban korAbban meg nem hasznAlt 
skalAr vAltoz6 mAr ne szerepeljen. Egy ilyen vAltozo megjelenese 
ugyanis azt eredmenyezi, hogy megvAltozik a tombvAltoz6k tArolon 
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beluli kezdocime, tehat a kepernydkezeld program nem kepes a 
karaktergenerator-mezot megtalalni. Ezt a problemat &gy szuntet- 
hetjik meg » hogy a program elejen - mint a 110-es sorban is 
Lit hat 6 - egy fiktiv ertekad&sban felsorol juk a programban alkal- 
mazott valamennyi skalar valtoz6t. 

A karaktergenerator-mezd feltoltese a 140. . . 145-6s sorban 
tortenik neg. A 150-es sorban levd POKE utasitas illitja be a 
128. ..255 k6d& karakterek karaktergenerator mezejenek kezddcimet 
tartalmazo rendszervaltozdt a megfeleld ertekre. (Ezzel egyidejfl- 
leg a 128... 151 kodok alatt szerepld - a PRIHO altal eredetileg 
ismert - karaktereket a gep "elfelejti" mindaddig r amig a RESET 
gombot meg nem nyomjuk. Ekkor viszont az altalunk definialt 
karakterek szunnek meg a program ftjabb futtatasaig. ) 



100 f L6verseny DEMO '84.1 

110 C=0 : VX=0 

120 DIM KX(12) : C=VARPTR(KX(0)) 'Tarcim 

130 ' 128.129 es 130.131 k6d definiilasa 

140 POKE 0,0,0,2,2,62,94,30,20,36,35,0,0,0,0,0,0 

145 POKE C+16, 0,32, 68, 108, 126, 120, 120, 20, 36, 35 

150 POKE 16459, C-256* INT (C/256), INT (C/256) 

160 DIM L0X(5) 'Lovak poziciija 

170 FOR 0=0 TO 5 : L0X(C)=3 : NEXT C : CLS 

180 PRINT CHR1(2)CHRS<4)" L6verseny "CHRS( 18)CHRS(20) 

190 PRINT 14,41, "C" : PRINT I7,41, ,, fe M : PRINT 110,41, "L" 

200 FOR C=35 TO 160 : SET(248,C) : NEXT C 

210 FOR 0=1 TO 5 : PRINT 12*C+1,0,C;CW?1(128)CHR!<130) : NEXT C 

220 POKE 16443, PEEK (16443) AND 127 'NMI tilos 

230 RANDOM : PRINT CHRK6) 'Elotorles 

240 FOR C=0 TO 500 : NEXT C 

250 BOSUB 360 : GOSUB 360 : BEEP 50,400 

260 'Lovak mozgatasa 

270 VX=RND(5) : IF VX=0 THEN 270 

280 PRINT 12*VX+1,L0X<VX),CHRS<5)" "CHR1(21)CHR1(128)CHRS(130) 

290 BEEP 50+10*VX,3 'Mozgas hangja 

300 L0X(VX)=L0X(VX)+1 

310 IF L0X(VX)<>39 THEN 270 'Tovabb! 

320 PRINT 114,8, "Gydzott a"VX". pilyan futd 16!" 

330 FOR 0=0 TO 2000 : NEXT C : PRINT CHRK22) 

340 POKE 16443, PEEK< 16443) +128 : OUT 0,PEEK(16443) 'NMI mehet ! 

350 GOTO 170 'Kovetkezd futam inditasa 

360 BEEP 50,50 : FOR 0=0 TO 100 : NEXT C : RETURN 

370 END ' Lover seny 
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A PRIHO hanggenerAtor parameterezese 

A PRIHO hanggenerAtora eLsdsorban azt a celt szolgAlja, hogy 
a billentyak megerinteset akusztikusan visszajelentse. Ezen 
talmenden azonban egysz6lana da 1 1 amok megszolaltatAsAra is fel- 
hasznAlhato. Ehhez termeszetesen a hanggenerAtort makodtetd BEEP 
BASIC utasitAst agy kell parameterezni, hogy a megszolal6 hang az 
egyenletesen temper alt ska I a egyik elene legyen. A kovetkezdkben 
megadjuk a parameterek kiszAmitAsAhoz szukseges kepleteket, es az 
egyenletesen temperAlt skAla Kontra oktavjat6l a Ketvonalas oktA- 
vig terjedo - 1 mAsodperc hosszasAga - hangok keltesehez szukse- 
ges BEEP-parameterek erteket. 

A PRIHO a BEEP utasitAs hatAsAra 50 X kitoltesi tenyezojft 
negyszogjelet bocsAjt ki. A megszolal6 hang - mikroszekundumban 
mert - periodusidejet az alAbbi keplet adja meg: 

T=2*<B.4*X+35) 

ahol X a BEEP utasitAs etso parametere. A peri6dusid6bol a hang 
frekvenciAja - Hz-ben - a kovetkezo egyszera szAmitAssal hatAroz- 
hat6 meg: 

f=l/T«10 6 

A kiadott hang - mAsodpercben mert - hosszasAgAt a kovetkezdkep- 
pen szAmolhatjuk: 

H=i/f*K 

ahol N a BEEP utasitAs mAsodik parametere. Ebbol a kepletbol 
adodikf hogy azonos hosszasAga, de kulonbozo frekvenciAja hangok- 
hoz mAs es mAs N ertek tartozik. 

Az egyenletesen temper Alt skAla Kontra oktAvjAt6l a Ketvona- 
las oktAvig terjedd zenei hangokhoz tartoz6 X es N ertekeket adja 
meg az alAbbi tAblAzat. Az elso oszlopban a hang neve, a mAsodik- 
ban a hang nevleges frekvenciAja talAlhato. A harmadik oszlopban 
az az X ertek All, amellyel a BEEP utasitAs a nevleges frekvenci- 
At legjobban megkozelitd hangot kelti. A negyedik oszlopban ta- 
lAlhatd H ertekkel 1 mAsodpercig szdl az adott hang. Vegul az 
utols6 oszlop azt mutatja, hogy az adott X ertek eseten a PRIHO 
milyen frekvenciAja hangot ad ki. Ez AltalAban nem egyezik meg a 
nevleges frekvenciAval, mivel X erteke csak egesz szAm lehet. Az 
el teres a frekvencia novekedesevel egyre nagyobb lesz. 
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Hang Nev leges fr. 
CHz3 



PRIHO fr, 

CHzl 



Kontra oktav 



$ \ 



Nagy oktav 



tt- 



Kis oktav 



c 


32.70 


1816 


32 


32.70 


*c 


34.65 


1714 


34 


34.64 


D 


36.71 


1617 


36 


36.72 


#D 


36.69 


1526 


38 


38.90 


E 


41.20 


1440 


41 


41.22 


F 


43.65 


1359 


43 


43.67 


#F 


46.25 


1283 


46 


46.24 


G 


49.00 


1211 


48 


48.98 


*G 


51.91 


1142 


51 


51.93 


A 


55.00 


1078 


55 


55.00 


#A 


5G.27 


1017 


58 


58.29 


H 


61.74 


960 


61 


61.74 


C 


65.41 


906 


65 


65.40 


#C 


69.30 


855 


69 


69.28 


D 


73.42 


807 


73 


73.38 


#D 


77.78 


761 


77 


77.79 


E 


82.41 


718 


82 


82.42 


F 


87.31 


67G 


87 


87.26 


#F 


92.50 


639 


92 


92.55 


G 


98.00 


603 


98 


98.04 


#G 


103.83 


569 


103 


103.85 


A 


110.00 


537 


109 


109.99 


*A 


116.54 


507 


116 


116.45 


H 


123.47 


47G 


123 


123.45 



CL 



C c 

#C CLS 

D I 

#D °U/i 

E c 

F \ 

#F p 1 

G % 

a r 

#A u.\i 

H JU 



130.81 
138.59 
146.83 
155.56 
164.81 
174.61 
185.00 
196.00 
207.65 
220.00 
233.08 
246.94 



451 
425 
401 
378 
357 
337 
318 
300 
282 
266 
251 
237 



130 
138 
146 
155 
164 
174 
184 
195 
208 
220 
233 
246 



130.77 
138.70 
146.91 
155.75 
164.81 
174.47 
184.76 
195.69 
208.00 
220.32 
233.27 
246.82 
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Hang 


Nevleges fr. 
CHz] 


X 


H 


PRIMO fr. 
CHz] 


Egyvonalas 












oktav 


C 


261.62 


223 


262 


262.03 




*C 


277. 18 


211 


276 


276.64 




D 


293.66 


199 


292 


292.98 




*D 


311.13 


187 


311 


311.37 


a4 


E 


329.63 


176 


330 


330.38 


F 


349.23 


166 


349 


349.80 




#F 


369.99 


157 


369 


369.33 




G 


391.99 


148 


391 


391.18 




#G 


415.30 


139 


415 


415.77 




A 


440.00 


131 


440 


440.37 




*A 


466.16 


124 


464 


464.43 




H 


493.88 


116 


495 


495.34 


K*t vernal as 












oktav 


C 


523.25 


110 


521 


521.38 




#C 


554.36 


103 


555 


555.43 




D 


587.33 


97 


588 


588.37 




#D 


622.25 


91 


625 


625.47 




E 


659.25 


86 


660 


660.15 




F 


698.45 


81 


698 


698.91 


&l 


#F 


739.98 


76 


742 


742.50 


G 


783.99 


72 


781 


781.49 -f- 




#G 


830.60 


67 


836 


836.40 




A 


880.00 


63 


886 


886.21 




*A 


932.32 


60 


927 


927.64 




H 


987.76 


56 


989 


989.32 



A fent megadott osszefugges X es a hang frekvenciaja kozott 
csak akkor pontos, ha a BEEP utasitas vegrehajtasa alatt az NHI 
ki van kapcsolva. (Ha az NMI-t nem kapcsolnank ki, akkor ezek az 
Interruptok raegszakitva a frekvenciat «eghatiroz6 gepi cikluso- 
kat, meghamisitjak a peri6dusido pontos erteket. Ez a tiszta 
hangban egy j6l halt hat 6 kattogast ered«*nyezne. A hang megszd- 
laltatasa utan az NHI-t azert celszerfl. ijra engedelyezni, hogy a 
PRIH0 m&kodeset a RESET biLUntyfli megnyomasaval ismet wegszakit- 
hassuk.) Az NHI ki- es bekapcsolasat mutatja be az alabbi BASIC 
programreszlet: 

■ ■ • 

100 POKE 16443, PEEK< 16443) AND 127 

110 BEEP X,N 

120 POKE 1 6443, PEEK < 16443) OR 128 : OUT 0,PEEK( 16443) 
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A PRIHO memdria felosztAsa 



Az alAbbiakban reszletesen ismertetjuk a PRIHO memdria fel- 
osztAsAt. Az Abra bal oldalAn lAthatd szAmertekek az adott teru- 
let kezddcimet, a jobb oldalon 4116 szAmok a vegcimet adjak meg. 
Az egyes teruletek kezdd- es vegcimeit decimal is es hexadecimal is 
szAmrendszerben is feltuntettuk. A szAmpAr elsd tagja a decima- 
lism mAsodik tagja a hexadecimAlis ertek. 

A szAmpArok nemelyike zArdjelben all. Ez azt kivanja jeldl- 
ni, hogy a kerdeses terulet kezddcime vAltozd ertek, amely a 
PRIHO mukddese sorAn - a vegrehajtott BASIC program fuggvenyeben 
- mas es nAs lehet. Ezert a zArdjelben annak a BASIC Interpreter 
vAltozdnak a cime talAlhatd f amely a kerdeses terulet pillanatnyi 
kezdd-, vagy vegcimet tarolja. 

A szAmpArok kdzul harmat karakterrel jeldltunk meg. E 
teruletek tipikus kezddcime az AbrAbdl megAllapithatd. Ezek a 
cimek a PRIHO BASIC Interpreterenek mukddese soran csak akkor 
vAltoznak meg, ha errdl a PRIHO FelhasznAldja gondoskodik. A 
hArom terulet kezddpontjAt a kdvetkezd cimeken elhelyezkedd BASIC 
rendszer- ill. Interpreter vAltoz6k hatArozzAk meg: 



- BASIC program kezddcime 

- Magnet of on puffer kezddcime 

- Billentyuzet puffer kezddcime 



<16548;40A4) 
( 16474; 405A) 
< 16551 ;40A7> 



Az AbrAban karakterrel JeLoltuk azon teruletek cimeit f 
amelyek a PRIHO RAH memdriAjAnak meretetdl fuggenek. Az alAbbi 
tAblAzatbdl a kuldnfele tipusu PRIHO-kra jellemzd ertekek kiol- 
vashat6k. (Mint az AbrAbdl lAthat6, e teruletek kezdd-, ill. 
vegcimet a 16561 ;40B1 cimen elhelyezkedd BASIC Interpreter 
vAltozd tArolja, igy a FelhasznAld azt megvAltoztathatja. A 
tAblAzat az ertekek alapertelmezeset tartalmazza. ) 



Karakter terulet vegcime: 
Kepernyd RAH kezddcime: 
Kepernyd RAH vegcime: 



PRIHO A-32 PRIHO A-48 PRIHO A-64 



26623; 67FF 
26624; 6800 
32767; 7FFF 



43007; A7FF 
43008; A800 
49151 ;BFFF 



59391;E7FF 
59392; E800 
65535; FFFF 



(A tAblAzatban megadott RAH-cimek a PRIHO '84.1 verzidjAra vonat- 
koznak. Az ertekek a PRIHO tovAbbfejlesztesekor megvAltozhatnak. ) 
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( 16561 ;40B1) -* 



< 16544; 40A0) -» 



( 16616} 40E8) -» 



( 16637; 40FD) -» 



( 16635; 40FB) ■» 



( 16633; 40F9) -» 



17385; 43E9 -» 



17129;42E9 -» 



16872; 41E8 -» 



16512; 4080 -» 



16384; 4000 ■* 



00000; 0000 -» 



Kepernyd RAM 



Karaktervaltoz6 terulet 



STACK (veremtir) 



***** 



Szabad terulet 



ttttt 



Tomb valtozok 



Skalar valtozok 



BASIC program 



Magnet of on puffer 



Billentyazet puffer 



*■ ( 16561 ;40B1)+6143 



♦- ( 16561 ;40B1)-1 



«- ( 16544; 40A0)-1 



♦- ( 16616; 40E8)-1 



*- ( 16637; 40FD)-1 



t- ( 16635; 40FB>-1 



«- ( 16633; 40F9>-1 



«- 17384; 43E8 



«- 17128; 42E8 



«- 16871; 4 1E7 



BASIC Interpreter valtozdk 



PRIMO rendszervaltoz6k 



PRIMO BASIC ROM 



L 



♦- 16511;407F 



♦- 16383;3FFF 
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PRIMO rendszerviltozok 



A PRIMO rendszervAltoz6i a 16384.. 16511 <4000...407F) cime- 
ken helyezkednek el. Itt talalhatok az RST-vektorok, nehAny ROM- 
kapocs (ROH-hook)f valamint a periferia kezeld programok munka- 
vAltozdi. A 128 byte meretfli teruleten meg fel nem hasznalt szabad 
teruletek is talalhatok. E teruletek kesobbi fejlesztes celjAra 
fenntartott reszek, ezert alkalmazAsukat nem ajAnljuk. 

A kovetkezfikben felsoroljuk a PRIMO rendszerv4ltozokat. 
Megadjuk decimal is es hexadecimal is memoriacimeiket, a valtozo 
Altai lefogtalt memoria meretet, valamint a vAltozo jelenteset. 
NehAny esetben a vAltozo utan egy B, ill. W betu lAthat6. Ez azt 
jelzi, hogy a kerdeses vAltozd 8 bites byte-kent, ill. 16 bites 
sz6kent kerul felhasznalAsra. Ha a vAltoz6 bitjei kulon jelentes- 
sel birnakf a leirAsban az egyes bitek ertelmezese is megtalAlha- 
t6. (Egy byte legertekesebb helyierteka bitje a 7-es bit.) 



DDODD 



LL 

M 



A vAltozd decimal is cime 

A vAltozo hexadecimal is cime 

A vAltoz6 hossza 

A vAltoz6 felhasznalAsi m6dja 



DDDDD HHHH LL M fertelmezes 

16384 4000 3 RST 08H vektor Az RST-vektorok a memdria 8H f 

16387 4003 3 RST 10H vektor 10H, ...38H cimein levo JP uta- 

16390 4006 3 RST 18H vektor sitAsok ROil-kapcsai. Segitse- 

16393 4009 3 RST 20H vektor gukkel a felhasznaloi progra- 

16396 400C 3 RST 28H vektor mok is alkalmazhatnak RST-ket. 

16399 400F 3 RST 30H vektor (A PRIMO BASIC hasznalja az 

16402 4012 3 RST 38H vektor RST 08H...20H utasitAsokat. ) 



16405 4015 
16408 4018 



16411 401B 
16414 401E 



3 
3 



3 
3 



16417 4021 6 



ROM-kapocs a memdria 5H cimerol. <5H = JP 4015H) 

NMI-rutin vege 

Az NMI-rutin m&kodese befejeztevel erre a cimre 

ugrikf igy a FelhasznAlo sajAt programjAval b6- 

vitheti a Nem Maszkolhat6 Interrupt rutint. 

Fenntartva 

RESET-rutin vege 

A RESET-rutin makodese utAn erre a cimre ugrikf 

igy a FelhasznAld sajAt programjAval bovitheti a 

RESET gomb megnyomAsa utin Lefutd programot. 

Fenntartva 
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JGklO hoik 3 



16423 4027 3 



16426 402A 
16441 4039 
16443 403B 



16444 403C 

16445 403D 



15 
2 



16448 4040 2 



Billentytlzet kill on leges mod ROH-kapocs 
A 6LINE rutin mAkodese soran, egy 128. ..255 kodil 
karakter begepelesekor a vezerles err* a cimre 
kerul. Igy a Felhasznald sajat programjaval dol- 
goztathatja fel a kuL on leges kdda karaktereket. 
Fenntartva 
U Kepernyd RAM kezddcime 

1 B KI-1 kapu tukdr-byte 

A PRIMO ebben a byte-ban tarolja a 0...63 
kapura utoljara kiirt erteket. T-3 1 ^ vT> 

1 Fenntartva 

3 Real-time dra 

A PRIMO mftkddese soran - ha az NMI aktiv 
szamlald erteket mind en 1/50-ed masodpercben 1-el 
megnoveli. A szamlald legkisebb helyiertekflt 8 
bitje a 16445-6s cimen helyezkedik el. 
Fenntartva 



cimQ 



- e 



A Z-80 mikroprocesszor IX regisztere a PRIMO 
m&kddese kdzben mindvegig a 16450 (4042H) erteket 
tartalmazza. Az IX regiszter tartalmat a Felhasz- 
nald gepi programja meg iddszakosan sem valtoz- 

tathatja meg. 



16450 4042 

16451 4043 

16452 4044 

16453 4045 



B'.-M - BtfU+iltvCL^ / V, 



16454 4046 

16455 4047 



16456 4048 

16457 4049 

16458 404A 

16459 404B 



1 
1 
1 

2 



B Utolsdkent megnyomott billentyOt ASCII kddja 
B Billenty&zet auto-repeat szamlald 
B Upper-bit, utolsd megnyomott billentyfli cime 
B Allapotjelz6 byte 

Bit3 =1, Printer 1EH, 1FH konverzid tilos 

Bit2 =1, Vilagit a kurzor , , , 

BitO =1, Billentyftzet kuldnleges uzemmdd aktiv ^ el 
B Billenty&zet iddzites szamlald <=24) 
B Kepernydkezeld allapotjelzd byte 

Bit7 =1, Nydjtott meretd karakter megjelenites 

Bit6 =l f Karakter alah&zas 

Bit5 =1, Feher kepernyd alapszin 

Bit4 =1» Inverz karakteralap 

Bit3 =1» Karakter eldtdrles 

Bit2 =1, Karakter eldtdrles puffer 

Bitl =1, Inverz rajzolis { : v.iasz!it 

BitO =lf Fuggdleges iras 
B Kepernydkezeld karakter oszlop cim (0. ..255) 
B Kepernydkezeld karakter sor cim (0...191) 
B Kepernyd RAM kezddcimenek ertekesebb 8 bitje 
W Kiegeszitd karaktergenerator ROM cim 

A PRIMO a 128. ..255 kddd karakterek megjelenite- 
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16461 404D 

16464 4050 

16465 4051 



16466 4052 

16467 4053 

16468 4054 

16469 4055 

16470 4056 



16471 4057 

16472 4058 
16474 405A 
16476 405C 



16477 405D 

16478 405E 

16479 405F 



16480 4060 

16481 4061 

16482 4062 
16498 4072 






sekor a karakter pontmintAzatAt tarol6 tAblAzat 

kezddcimet ebbol a vAltozdbol olvassa ki. Igy e 

karaktereket a FelhasznAlo definiAlhat ja. 
3 Fenntartva 

1 B A nyomtato egy sorAnak maximAlis hossza 
1 B A nyomtato egy lapjAn levd sorok maximal is szama 

Ha egy lapon tobb mint 127 sort jelolunk ki, a 

PRIM0 a nyomtat6ra nem kuld lapdobAs (Form Feed) 

karaktert. 
1 B A nyomtat6 aktuAlis sorAban lev6 karakter ek szAraa 
1 B A nyomtato aktuAlis lapjan lev6 sorok szama 
1 B A kurzor nyomtat6 soron beluli pozici6ja 
1 Fenntartva 
1 B Mag no Allapotjelz6 byte 

Bit7 =1, Van megnyitott magno AllomAny 

Bit6 =1, Az AllomAny olvasAsra nyitott 

Bit5 =1, Magn6 puffer *«*pBiwB»-ures 

Bit4 =1, TEST utasitAs vegrehajtAsa folyik 
=0p LOAD lit as it as vegrehajtAsa folyik 

Bit2 =1, Megadtak AllomAnynevet 

Bitl =1, InformAci6s sor nem jelenik meg 

1 B Magn6 puffer szAmlAlo (0=256) 

2 W Magn6 puffer pointer 
2 W Magno puffer kezdficime 
1 B FeldolgozAs alatt AU6 blokk tipusa 

083H = BASIC program nev-blokk ^34 
087H =_Adat Allo mAny nev-blo_kk__-_l 35 " 
ATf- 0B1H = BASIC program zAro-blokk 
W 0B5H = Kepernyd tartalom zArd-blokk 
4£3> 0B7H = AdatAllomAny zAro-blokk 
48S 0B3H = Gepi kodu program zAr6-blokk 
2k\ 0F1H = BASIC program adat-blokk 
lk5 0F5H = Kepernyo tartalom adat-blokk 
£4> 0F7H = AdatAllomAny adat-blokk > 
2.1*3 0F9H = Gepi kodu program adat-blokk - 
1 B HibAsan beolvasott blokkok szAma (BCD k6dban) 
1 B UtoljAra beolvasott blokk sorszAma (BCD k6dban) 
1 B Magn6 Allapotjelzo byte 

010H = Az adott magno nem fordit polar it Ast <£-$££. 
0EFH = Az adott magno polaritAst fordit 
1 B Magn6 beolvasAskor szAmitott bit-ideje <.T75) V-fS MH?- 50 
1 Fenntartva 
16 B Magno AllomAnynev puffer 
14 Fenntartva 



p tii tie 



16511 407F 



PR I M0 rendszervAltoz6 terulet vegcime 



(A tAblAzatban megadott RAM-cimek a PRIM0 '84.1 verzi6jAra vonat- 
koznak. Az ertekek a PRIM0 tovAbbfejlesztesekor megvAltozhatnak. ) 
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PRIMO BASIC Interpreter vAltozok 



A PRIMO Interpreter vAltoz6i a 16512. .. 16868 (4080. . .41E4) 
cimeken helyezkednek el. Itt talAlhat6k a BASIC interpreter 
mukodesehez szukseges munkavAltozok, az aritmetika munkavAltozii, 
az Interpreter ROM-kapcsai, valamint a f 84. 1 verzio Altal nem 
ertelmezett BASIC kulcsszavak RQM-kapcsai. A BASIC Interpreter 
vAltozok kozott meg fel nem hasznAlt, szabad teruletek is talAl- 
hat6k. Ezek a kesobbi fejlesztesek szAmAra fenntartott teruletek, 
ezert alkalmazAsukat nem ajAnljuk. 

A kovetkezdkben felsoroljuk a PRIMO Interpreter vAltozoit. 
Megadjuk decimAlis es hexadecimAlis memoriacimeiket, a v4ltoz6k 
altal lefoglalt mem6ria meretet, valamint a vAltozdk jelenteset. 
A vAltoz6k utan egy B, ill. U beta is lAthat6. Ez azt jelzi, hogy 
a kerdeses vAltozdt a PRIMO 8 bites byte-kent, vagy 16 bites 
sz6kent ertelmezi-e. 



DDDDD A vAltozo decimal is cime 

HHHH A vAltoz6 hexadecimAlis cime 

LL A vAltozo hossza 

M A vAltoz6 felhasznalAsi m6dja 



DDDDD HHHH LL M fertelmezes 



16512 4080 14 Ki vonorutin az egyszerespontos osztAs szamara. 

Az egyszerespontos oszt6 rutin mukodesenek egy- 

szerasitese erdekeben ezen a teruleten - az aktu- 

ilis oszto fuggvenyeben vAltoz6 - szubrutin he- 

lyezkedik el. Az utasitAs kddokat reszben a PRIMO 

bekapcsolAsakor mukodA inicializAlA program, 

reszben maga az oszt6 rutin irja be erre a teru- 

letre. 

Fenntartva 

VAietlenszAm gen erator szorzA. 

Ezen a teruleten a PRIMO az 5105216 erteku kons- 

tanst tArolja. Egy ujabb veletlen szAm general A- 

sakor a PRIMO ezt az erteket megszorozza az elAzA 

veletlen szAmmal, majd a szorzat kevesbe ertekes 

24 bitjebdl alakitja ki a soronkovetkezd veletlen 

szAmot. 

Szubrutin az INP fuggveny szAmAra. 

A rutin az IN A,(x) — RET utasitAsokbAl All. Az 

INP fuggveny argumentumakent megadott cimet - x - 



16526 408E 
16528 4090 



2 
3 



16531 4093 3 
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Lo i 



d 2'J-Tr - 



16534 4096 

16538 409A 

16539 409B 

16540 409C 



16541 409D 

16542 409E 
16544 40A0 
16546 40A2 
16548 40A4 

-""> 16550 40A6 
16551 40A7 
16553 40A9 



16554 40AA 

16557 40AD 

16558 40AE 



16559 40AF 



16560 
16561 
16563 
16565 
16595 
16598 
16600 
16602 
16604 



40B0 
40B1 
40B3 
40B5 
40D3 
40D6 
40D8 
40DA 
40DC 



4 
1 
1 
1 



az IN utasitAsba az INP fuggvenyt vegrehajtd 

programresz helyezi el. 

Fenntartva 
B Utols6 hiba kodja 

Fenntartva 
B AktuAlis output eszkoz kddja 

kepernyo = 

printer = 1 >£> 

magnd = Vl £jfi 
B Kepernyd sor hossza (=42) 

Fenntartva 
U KaraktervAltoz6 terulet vegcime 
W Aktualis BASIC programsor sorszAma 
U BASIC program terulet kezddcime 

Fenntartva 
U Billentyftzet puffer kezddcime ( =16872; 41E8) 
B INPUT utasitAs Allapotjelzd byte Zzo: 

= 0, INPUT a billentyuzetrdl 



- r ■ 



16605 40DD 

16606 40DE 

16607 40DF 

16609 40E1 

16610 40E2 
16612 40E4 
16614 40E6 



1 
2 
2 
30 
3 
2 
2 
2 
1 

1 
1 

2 
1 

2 
2 
2 



^ 



'ntv 'A i bJL- - 
•v ovh.s. ; 



B 



16616 40E8 2 W 



= -l f INPUT a magndr6l 

UtoljAra general t veletlen szAm 

Fenntartva 

VAltozo kereses/definiAlAs Allapotjezo 

= 0, csak keres£s, definiAlAs tilos 

1 r sikertelen kereses utan definiAlAs 
1 B Lebeg6pontos akkumulAtorban orzdtt ertek tipusa 

= 2, egesz tipusu ertek 

= 3» karakteres ertek 

= 4 f egyszerespontos ertek 

= 8, duplapontos ertek 
B Tobbcelu puffer vAltoz6 
W BASIC Altai hasznAlhat6 RAM vegcime+1 
U Karakter-operandus STACK mutat6 

Karakter-operandus STACK 

Utols6 karakter-operandus leiroja 
U KaraktervAltozd terulet mutat6 

Tobbceli puffer vAltozd 
U AktuAlis DATA sor sorszama 
B FOR utasitAs Allapotjelzo 

= Of nem FOR utasitAs vegrehajtAsa folyik 

Konstans wewy Uows-^ows , ""Re-UxVA vn?-\ \ 

INPUT/READ Allapotjelzo 

= 0, INPUT utasitAs vegrehajtAsa folyik 

Tobbceld puffer vAltozo 

AUTO Allapotjelzd 

= Or AUTO uzemm6d nem aktiv 
W AUTO kezdo/soronkovetkezo sorszAm 
U AUTO novekmeny ( kezdetben = 10) 

AktuAlis BASIC utasitAs programteruleten beluli 

kezdocime 

AktuAlis BASIC utasitAs vegrehajtAsAnak megkezde- 



B 
B 



B 



Ul 
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16618 


40EA 


2 


Ul 


16620 


40EC 


2 


U 


16622 


40EE 


2 


U 


16624 


40F0 


2 


u 


16626 


40F2 


1 


B 


16627 


40F3 


2 


U 


16629 


40F5 


2 


U 



16631 40F7 2 W 



16633 


40F9 


2 


U 


16635 


40FB 


2 


W 


16637 


40FD 


2 


w 


16639 


40FF 


2 


w 


16641 


4101 


26 


B 


16667 


411B 


1 


B 


16668 


411C 


1 


B 


16669 


411D 


8 




16677 


4125 


1 


B 


16678 


4126 


1 


B 


16679 


4127 


8 




16687 


412F 


1 




16688 


4130 


26 




16714 


414A 


8 





sekori STACK mutato erteke 

Utols6 hibat tartalmaz6 BASIC proqramsor sorszama 

Az utols6 hibat tartalmaz6, ill. az utoljara 

listazott/editalt sor sorszama (a . erteke) 

Utols6 hibat okoz6 BASI C utasitas programterule- 

ten beluli kez docime 

Programozott hibakezelest vegzd BASIC rutin prog- 

ramteruleten beluli kezdocime 

Programozott hibakezeles allapotjelzo 

= Of nera programozott hibakezeles vegrehajtasa 

folyik 255" ?f0^o.^cnaif 'vWV'i'^,'^ ~o4,yC 

Programterulet mutato puffer 

A PRIMO egy kifejezes kiertekelese idejen itt 

tarolja a programterulet mutato aktualis erteket. 

CONT sorszim 

A BASIC program megszakitasa, ill. STOP/END uta- 

sitassal tor tent megallitasa utan a PRIMO itt 

tarolja azon BASIC utasitassor sorszamat, amely- 

ben az utoljara vegrehajtott BASIC utasitas elhe- 

lyezkedik. 

CONT programterulet cime 

A BASIC program megszakitasa, ill. STOP/END uta- 

sitassal tortent megallitasa utan a PRIMO itt 

tarolja a soronkovetkezG BASIC utasitas program- 

teruleten beluli kezdocimet. 

Skalar valtoz6k tablazatanak kezdocime 

Tomb valtoz6k tablazatanak kezdocime 

Szabad BASIC programterulet .kezdocime 

DATA- list a mutato 

ValtozO tipusazonositA tibia 

TR0N/TR0FF allapotjelz6 

= 1, TRON aktiv 4= O ViV, " 

Atmeneti tarol6 az aritmetika szamara 

Lebegopontos Akkumulator *1 

Atmeneti tarol6 az eredraeny elojele szamara 

Atmeneti tarolo az aritmetika szamara 

Lebegopontos Akkumulator *2 

Fenntartva 

Munkaterulet a Binaris -* Karakteres konverzio 

szamara 

Atmeneti tarolo a duplapontos oszt6 rutin szamara 
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A soronkovetkezo teruleten azon BASIC utasitisok ROH-kapcsai 
helyezkednek el, melyek a PRIMO f 84. 1 verzi6jAban nem definiAl- 
tak. 

A 16722. .. 16805 <4152. . .41A5) cimeken JP utasitisok helyez- 
kednek el, melyek a vezerlest alaphelyzetben az SN - Syntax 
Error, Forroai hiba - hibajelzest vegrehajto rutinra adjAk at. A 
FelhasznAl6 a JP utasitisok cimmezejet Atirva, az egyes ROM- 
kapcsoknAL megadott BASIC kulcsszavak eldfordulisakor a vezerlest 
a sajAt gepi k6da rutin jAra adhatja At, ilymodon a PRIMO BASIC 
programozAsi nyelvet <ij utasitAsokkal, ill. fuggvenyekkel bdvit- 
heti. 



16722 


4152 


CVI 


16725 


4155 


FN 


16728 


4158 


CVS 


16731 


415B 


DEF 


16734 


415E 


CVD 


16737 


4161 


EOF 


16740 


4164 


LOC 


16743 


4167 


LOF 


16746 


416A 


MKIS 


16749 


416D 


MKSS 


16752 


4170 


MKDS 


16755 


4173 


CMD 


16758 


4176 


TIMES 


16761 


4179 


Fenntartva 



16764 


417C 


FIELD 


16767 


417F 


GET 


16770 


4182 


PUT 


16773 


4185 


Fenntartva 


16776 


4188 


Fenntartva 


16779 


418B 


MERGE 


16782 


418E 


Fenntartva 


16785 


4191 


KILL 


16788 


4194 


& 


16791 


4197 


Fenntartva 


16794 


419A 


Fenntartva 


16797 


419D 


INSTR 


16800 


41A0 


Fenntartva 


16803 


41A3 


Fenntartva 
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A kovetkezo teruleten olyan ROM-kapcsok helyezkednek el, 
melyek a ROM kulonbozd pontjair6l a vezerlest a RAM-ba adjAk At, 
lehetove teve, hogy a PR I MO BASIC programozAsi 
tAsainak makodeset a FelhasznAlo sajAt gepi 
beiktatAsAval megvAltoztassa. 



nyelv eg yes utasi- 
kodu programresz 



Az eddigiekhez hasonloan megadjuk a ROM-kapocs decimal is es 
hexadecimAlis cimet, valamint azt a hexadecimal is ROM-cimet, 
ahonnan a vezerles - egy CALL gepi utasitAs segitsegevel - az 
adott ROM-kapocsra kerul. Roviden arra is utalunk, hogy a kiugrAs 
milyen funkci6 vegrehajtAsAnak megkezdese eldtt kovetkezett be. 
(A 16806. .. 16868 (41A6. . .41E4) cimeken RET utasitAsok helyezked- 
nek el. A FelhasznAl6 feladata, hogy a kivilasztott cimre egy JP 
utasitAst irjon, amely a vezerlest a sajat gepi kodil rutin eleje- 
re adja at. ) 



16806 
16809 
16812 
16815 
16818 
16821 
16824 

16827 
16830 
16833 
16836 
16839 
16842 
16845 



41A6 
41A9 
41AC 
41AF 
41B2 
41B5 
41B8 

41BB 
41BE 
41C1 
41C4 
41C7 
41CA 
41CD 



16848 41D0 
16851 41D3 

16854 41D6 
16857 41D9 
16860 4 IDC 

16863 41DF 
16866 41E2 



19EC 

1A1C 

1AA1 
1AEC 
1AF2 

1B8C 
2174 
032C 

1EA6 
206F 
20C6 

2103 
2108 

219E 

222D 

2278 



Hibajelzes, 

Fenntartva 

Visszateres 

Fenntartva 

TokenizAlAs 



(E)=hibakod 



Direkt modba WiioQ, "KRV, E^D 



1 



vege, vegrehajtAs kezdete 

- dlj sor beinzertAlAsa befelyezddott 

- Oj sor beinzertAlAsAt koveto NEW parancs 
vegrehajtAsa befejezodott 

- NEW parancs vegrehajtAsAnak vege 

- PRINT, LPRINT utasitAs vege 

- KiirAs az aktuAlis output eszkozre 

- Fenntartva 

- Operandussal kiegeszitett RUN parancs kezdete 

- PRINT utasitAs kezdete 

- PRINT, LPRINT utasitAsban egy szArn kiirAsa az 
aktuAlis output eszkozre 

- Sor erne I es az aktuAlis output eszkozon 

- PRINT, LPRINT utasitAsban vessz* feldolgozAs 
kezdete 

- INPUT utasitAs kezdete 

- MIDI utasitAs 

- INPUT, READ utasitAsban a kovetkezo vAltozo 
ertekadAsAnak elokeszitese 

- nem magnorol vegrehajtott INPUT utasitAs vege 

- Fenntartva 



(A tAblAzatokban megadott RAM- es ROM-cimek a PRIMO f 84. 1 verzio- 
jAra vonatkoznak. Az ertekek a PRIMO tovAbbfejlesztesekor megvAl- 
tozhatnak. ) 
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A PRIHO Beneneti /Kineneti kapui (I/O Portok) 



A PRIHO a 256 Beneneti es Kineneti kaput 4 - egyenkent 64 
cinet tartalnaz6 - csoportra osztja, 6s az igy keletkezett 4 
Bemenet es 4 Kimenet kozul az elsd ket B/K kaput hasznAlja. A 
kovetkezftkben felsoroljuk e kapuk bitjeinek egyedi jelenteset. 
(Az egyes bitek iltal vezerelt Arankordk reszletes ismertetese a 
PRIHO FOZETEK sorozatban negjelent HARDVER leirAsban talAlhatd. ) 

Kineneti kapuk 

A PRIHO ket kineneti kaput - KI-1, KI-2 - hasznAl. A KI-1 8 
bites, a KI-2 4 bites. A PRIHO '84.1 verzidja csak a KI-1 kapu 
bitjeit kezeli, a masik kapu kezeleset - ha szukseges - gepi 
k6du, vagy BASIC progrannaL a Fel hasznAl 6nak kell negoldania. 



KI-1 (0...63 ciMk) 



default Uu v<^ LZ* 



A KI-1 kapu a PRIHO Altai Anos kineneti regisztere. A kapu 8 
bitje segitsegevel a hardver kulonfele reszeit a tobbitdl fugget- 
lenul vezerelhetjuk. Az egyes bitek jelentese a kovetkezd: 

Bit7: NHI engedelyezes 

Ha e bit erteke =1, akkor a PRIHO nftkodeset ninden -±/5e— /i/JOQ 
nAsodpercben egy NHI szakitja meg. Ellenkezd esetben az 
NHI nen jut brvinyre. 

Bit6: BotkormAny leptetes 

Ezen bit ertekenek ninden l-»0 Atnenete a botkormAnyba 
epitett kivAlasztd-szanlAl6 tartalmAt 1-el megndveli. 

BitS: Hagn6 tAvvezerles, vagy V24/2 

A bitbe erteket irva a PRIHO hAtlapjAn levft "TAPE" jela 
csatlakozd 4-es pontjAn +5V feszultseg jelenik neg, nig a 
bit erteke eseten a csatlakoz6n a FoldpotenciAlhoz vi- 
szonyitva OV nerhetd. 

Bit4: HanggenerAtor - Duda - vezerles 

A bitbe 1 erteket irva a PRIHO a piezoelektronos hangszord 
menbrAnjAt "elnozditja", nig ertek eseten nyugalomban 
hagyja. 
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Bit3: Kepernyo lapkijeloles 

Ha e bit erteke 1, a PRIHO a szamitogephez kapcsolt TV 
keszuleken a memoria utolso 6 Kbyte-ja Altai meghatArozott 
keptartalmat jeleniti meg, mig ha a bit erteka, a TV-n a 
memoria 8 Kbyte-al alacsonyabb cimetdl kezdodd 6 Kbyte-nyi 
terulete jelenik meg. 

Bit2: Magno tAvvezerles, vagy V24/1 L<?4 

A bitbe erteket irva a PRIHO hAtlapjAn levo "TAPE" jelft. 
csatlakozd 5-6s pontjAn +5V feszultseg Jelenik meg, mig a 
bit 1 erteke eseten a csatlakozon a FoldpotenciAlhoz vi- 
szonyitva OV merhetd. 

Bitl: Magnd adatkimenet vezerles 1 
BitO: Magnd adatkimenet vezerles 2 

Az 1-es es O-As bitek a magnd adatkimenetenek vezerleset 
szolgAljAk. A ket bit egyuttes erteke hatarozza meg a 
PRIHO "TAPE" jelfi. csatlakozdja 1-es kimeneti pontjAnak 
AllapotAt. A kulonbozd Allapotok a kovetkezo kddokkal 
vAlthatdk ki: 

Bitl: BitO: 

1 
1 

A KI-1 kapu egyes bitjeinek fuggetlen Jelentese van f de a 8 
bit csak egyszerre irhatd, es a kapu aktuAlis tar talma nem olvas- 
hatd vissza. Ezert a memoriAban a 16443;403B cimen a rendszer 
eltArolja a KI-1 kapura utoljAra kiirt 8 bit erteket. Ezt az 
erteket tukor-byte-nak nevezzuk. Amennyiben a KI-1 kapu valame- 
lyik bit Jet mddositani akarjuk, azt helyesen dgy tenet Juk meg, 
hogy a tukor-byte erteket a memdriAbdl kiolvassuk, abban a kivA- 
lasztott bit erteket megvAltoztatJuk, majd az ij erteket egyreszt 
visszairjuk a memdriAba, mAsreszt kikuldjuk a 0. ..63 cima hardver 
kapura. Ha nem igy jArunk el, a PRIHO helytelenul fog makddni. Az 
elobbi folyamat BASIC programmal tdrtend megvaldsitAsAra tekint- 
suk a kdvetkezd peldakat: 

Feladat: Az NHI kikapcsolAsa 

POKE 16443, PEEK < 16443) AND 127 'Bit7-be 
OUT 0, PEEK (16443) 'Tukor-byte kikuldese 

Feladat: Az NHI visszakapcsolAsa 

POKE 16443, PEEK (16443) OR 128 : OUT 0,PEEK( 16443) 
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alacsony szint *• -HOmV 


1 


alaphelyzet " 0V 





alaphelyzet "• 0V 


1 


magas szint "" +110mV 
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KI-2 (64... 127 CIHEK)* 

A KI-2 kapu a PRIHO opcionAlis soros busz At vezerli. E soros 
busz felhasznAlAsAval pi. a PRIHO-hoz - megfelelo program segit- 
segevel - a C ommo d ore szemelyi szAmitogepeknel alkalmazott soros 
buszra illeszkedd periferiAkat kapcsolhatunk. A soros busz keze- 
leset a '84.1 verzi6 nem teszi lehetove, azt gepi kodft, vagy 
BASIC programmal a FelhasznAlonak kell megoldania. A soros busz 
egyes bitjeinek jelentese a kovetkezd: 



Bit5: Soros busz orajel (SCLK) 



?? 



Az SDATA vonalat ervenyesitd jel. Nivel a soros buszon az 
informAciok byte-okkent ertelmezettek, e jel mint a pArhu- 
zamos-soros Atalakito orajel e alkalmazhat6. 

Bit4: Soros busz adat (SDATA) Ai 

A soros busz adat jel e. Ezen a vonalon keresztul kuldhetd 
ki - pArhuzamos-soros AtalakitAs utAn - adat a megcimzett 
periferiAra. 

Bit2: Fenntarva (SRQ) k 

Soros busz kiszolgALAs keres. A megfelelo funkcio felhasz- 
nAlAsAhoz a PRIHO nyomtatott Aramkori lemezen egy Atkotest 
- jumper - kell letrehozni. (Az Aramkor reszletes ismerte- 
tese a HARDVER leirAsban talAlhat6 meg. Az SRQ jel segit- 
segevel a PRIMO-ban maszkolhato IT generAlhato. ) 

Bitl: Soros busz figyelemfelhivAs (ATN) 1 

E jel aktivizAlAsAval a soros buszra kapcsolt valamennyi 
periferia arra utasithat6, hogy - egy megfelelo protokoll 
szabAlyai szerint - vizsgAlja: a buszon erkezd informAcio 
szAmAra ertekes-e. Az a berendezes amelyik az ATN jelet 
aktivAlja, lesz a BUS-MASTER, a tobbi periferia SLAVE 
uzemmodban fog m&kodni. 

Bit7: 
BitG: 
Bit 3: 
BitO: Ezen bitekhez nem kapcsol6dik hardver. 

A soros buszon az aktiv jelszint alacsony, vagyis az egyes bitek 
erteke kepviseli az aktiv, az 1 ertek az inaktiv Allapotot. 

+ A KI-2 KAPU CIHEI A PRIHO TOVABBFEJLESZTtSftVEL A 128. . . 191 IN- 
TERVALLUHBA F06NAK KEROLNI. 
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Bemeneti kapuk 

A PRIMO ket bemeneti kaput - BE-1, BE-2 - hasznAl. Mindket 
bemeneti kapu 6 bites. A PRIMO '84.1 verzi6ja csak a BE-1 kapu 
bitjeit kezeli, a mAsik kapu kezeleset - ha szukseges - gepi 
kodft, vagy BASIC programmal a FelhasznAlonak kell megoldania. 

BE-1 (0...63 cimek) 

A BE-1 kapu a PRIMO Altai Anos bemeneti regisztere. A kapu 6 
bitje segitsegevel a hardver kulonfele reszeinek Allapota kulon- 
kulon lekerdezhet6. Az egyes bitek jelentese a kovetkezo: 

BitS: KepkioltAs 

32, 

A bit 1 erteke azt jelzi, hogy a PRIMO-hoz kapcsolt TV 

keszulek elektronsugara - kepvisszafutAs miatt - ki van 

kapcsolva. E bit vizsgAlatAval a fut6 program mttkodeset a 

mAsodpercenkent 50 alkalommal bekdvetkezo kepvAUAshoz 

szinkronizAlhatja. 

Bit4: BE-2/4 bit ^0^y> ? c^'/^y 

A 4-es bit erteket a PRIMO "BIE" jell - 2*25 polusa - 
csatlakozojAhoz kapcsolt berendezes hatArozhatja meg. A 
bit erteke a BIE B-15 pontjanak AllapotAt tukrdzi. 

Bit3: BE-2/3 bit "STLpTloyo 

2 

A 3-as bit erteket a PRIMO "BIE" jelft - 2«25 polusft - 
csatlakozftjAhoz kapcsolt berendezes hatarozhatja meg. A 
bit erteke a BIE B-25 pontjanak AllapotAt tukrozi. 

Bit2: Magno adatbemenet 

A magno adatbemenet bit erteket a PRIMO "TAPE" jelft csat- 
lakoz6janak 3-as pontjan levo feszultseg jelformAlAs utAni 
Allapota hatarozza meg. Ezen a biten keresztftl fogadja a 
PRIMO a magnor6l erkezo soros adatbiteket. A bit alacsony 
erteke a PRIMO-ban maszkolhato IT-t general. 

Bitl: RESET nyomogomb allapota 

2 

Az 1-es bit Allapota a PRIMO hatoldalan elhelyezkedo RESET 
billentyft - pergesmentesites utAni - aktuAlis erteket 
jelzi. A bit erteket a PRIMO MMI-kiszolgAl6 rutinja vizs- 
gAlja, de a Fel hasznAl 6 gepi kodft, vagy BASIC program 
segitsegevel is ellenorizheti. 
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BitO: Billentyfizet bemenet 

A billentyftzet megcimzett gombjAnak aktuAlis AllapotAt 
jelkepezi. Ha a bit erteke =l f a kivAlasztott gombot eppen 
megerintettuk. 

A BE-1 kapu 5...1 bitjeivel ellentetben - ahol a beolva- 
sAskor alkalmazott 0. ..63 cimek egyenertekftek - t a kulon- 
bozd cimekrdl olvasott 0-As bit-ertekek a billentyftzet 
egyes gombjainak AllapotAra jellemzdek. Igy a Z-90 mikro- 
processzor 0. ..63 cimft beneneti kapuinak 0-as bitjeit 
vegigvizsgAlva a billentyftzet valamennyi gombjAnak Allapo- 
ta lekerdezheto. (A billentyftzet gombjaihoz rendelt peri- 
feria cimek a D. Fuggelekben talAlhat6k. ) 

Bit7: 

Bit6: Ezen bitekhez nem kapcsolodik hardver. 

BE-2 (64... 127 cimek) 

A BE-2 kapu a PRIMO kulonleges bemeneti regisztere. Ezen a 
kapun keresztul olvashat6k be az - opcionAlis - soros busz, es a 
botkormAnyok Allapota. Az egyes bitek jelentese a kovetkezi: 

Bit5s Soros busz orajel <SCLK) 

Az SDATA vonalat ervenyesitfi jel. MiveL a soros buszon az 
informAci6k byte-okkent ertelmezettek, e jel mint a soros- 
pArhuzamos Atalakitd orajele alkalmazhatd. 

Bit4: Soros busz adat (SDATA) 

A soros busz adatjele. Ezen a vonalon keresztul olvashat6 
be - soros-pArhuzamos AtalakitAs utan - adat a megcimzett 
periferiArol. 

Bit3: Soros busz kiszolgALAs keres (SRQ) 

Az SRQ jel segitseg*vel jelezheti egy - a soros buszra 
kapcsol6d6 - periferia, hogy a BUS-MASTER-t6l kiszolgAlAst 
ker. Az SRQ jel aktivizAlAsa a PRIMO-ban maszkolhat6 IT-t 
okoz. 

Bit 2: BotkormAny adatbemenet 2 

Ezen a bemeneti biten vizsgAlhatft a PRIHO-hoz kapcsolt 2. 
botkormAny 8 kapcsol6jAnak pillanatnyi Allapota. A megfe- 
lel6 kapcsoldt a BotkormAny leptetes (KI-1/6 bit) kimene- 
ten kikuldott inpulzusok hatAsAra erteket vAlt6 kivalasz- 
to-szAmlAl6 aktuAlis erteke jeloli ki. 
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Bit Is Soros busz figyelemfelhivas (ATN) 

E jel aktivizalasaval a PRIHO arra utasithato, hogy - egy 
megfelelo protokoll szabalyai szerint - vizsgalja: a bu- 
szon erkezd informacio szamara ertekes-e. Ha a PRIHO az 
uzenetet ertekesnek talalja, a tovabbiakban SLAVE iizemmod- 
ban varja a soros busz on erkezd adatokat. 

BitO: Botkormany adatbemenet 1 

Ezen a bemeneti biten vizsgalhat6 a PRIHO-hoz kapcsolt 1. 
botkormany 8 kapcsol6janak pillanatnyi allapota. A megfe- 
lel6 kapcsoldt a Botkormany leptetes (KI-1/6 bit) kimene- 
ten kikuldott impulzusok hatasara erteket valtd kivalasz- 
to-szamlal6 aktualis erteke jeloli ki. 

Bit7s 

Bit6: Ezen bitekhez nem kapcsol6dik hardver. 

E leirasban fel nem sorolt kapukat a PRIHO m&kodteto prog- 
ramja nem hasznalja, igy azok a szamitogephez kapcsolt kulonbozo 
periferiak vezerlesere hasznalhatok. Az egyes kapu-csoportok 
hardver kivalasztasat a PRIHO elvegzi, a dekodolt jelek a "BIE" 
jelfli csatlakozon elerhetfik. (A reszletes ismertetes a HARDVER 
leirasban megtalalhat6. ) 

A PRIHO tovabbfejlesztese soran a 192.. .255 cimft be-, ill. 
kimeneti kapuk felhasznalasat nem tervezzuk. Ezert ezek a cimek 
szabadon felhasznalhat6k. 
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PRIMO BASIC kulcsszavak be I so k6djai 



A PRIMO BASIC Interpreter* a Felhasznal6 BASIC programjanak 
gyorsabb vegrehajtasa es memoriaigenyenek csokkentese erdekeben a 
BASIC nyelv kulcsszavait es aritmetikair ill. relaciis mftveleti 
jeleit a memdriaban egyetlen 8 bites adat - agynevezett token - 
formajaban tarolja. A tokenek k6dja a 128. ..251 tartomanyba esik. 
A tokenek pontos ismerete nelkul a BASIC program memorian beluli 
formaja nehezen ismerheto fel, es a Felhasznal6 nem vallalkozhat 
a PRIMO BASIC nyelvenek sajat gepi programjaval vegrehajtott 
bovitesere. 

Ezert a kovetkezokben - ket tablazatba rendezve - felsorol- 
juk a PRIMO BASIC valamennyi tokenjet, megadva annak decimalis es 
hexadecimalis kodjit. A tokenek egy resze a BASIC '84.1 verzioja- 
ban nem alkalmazhatd. Ezeket a kulcsszavakat az alabbi tiblazat- 
ban a » karakterrel jeloltuk meg. 

Kulcsszavak es Mftveleti jelek token kod szerint rendezve 



token kod kulcsszd 
dec hex 



token kod kulcssz6 
dec hex 



token k6d kulcsszd 
dec hex 



128 80 

129 81 

130 82 

131 83 

132 84 

133 85 

134 86 

135 87 

136 88 

137 89 

138 8A 

139 8B 

140 8C 

141 8D 

142 8E 

143 8F 

144 90 

145 91 

146 92 

147 93 

148 94 

149 95 

150 96 

151 97 



END 

FOR 

RESET 

SET 

CLS 

CMD * 

RANDOM 

NEXT 

DATA 

INPUT 

DIM 

READ 

LET 

GOTO 

RUN 

IF 

RESTORE 

B0SUB 

RETURN 

REM 

STOP 

ELSE 

TR0N 

TR0FF 



152 98 

153 99 

154 9A 

155 9B 

156 9C 

157 9D 

158 9E 

159 9F 

160 A0 

161 Al 

162 A2 

163 A3 

164 A4 

165 A5 

166 A6 

167 A7 

168 A8 

169 A9 

170 AA 

171 AB 

172 AC 

173 AD 

174 AE 

175 AF 



DEFSTR 

DEFINT 

DEFSNG 

DEFDBL 

BEEP 

EDIT 

ERROR 

RESUME 

OUT 

ON 

OPEN 

FIELD * 

BET « 

PUT * 

CLOSE 

LOAD 

MERGE « 

TEST 

KILL » 

CREATE 

fn » 

SAVE 

SCREEN 

LPRINT 



176 BO 

177 Bl 

178 B2 

179 B3 

180 B4 

181 B5 

182 B6 

183 B7 

184 B8 

185 B9 

186 BA 

187 BB 

188 BC 

189 BD 

190 BE 

191 BF 

192 CO 

193 CI 

194 C2 

195 C3 

196 C4 

197 C5 

198 C6 

199 C7 



» 
« 



DEF 

POKE 

PRINT 

CONT 

LIST 

LLIST 

DELETE 

AUTO 

CLEAR 

CLOAD 

CSAVE 

NEW 

TAB( 

TO 

FN » 

USING 

VARPTR 

CALL 

ERL 

ERR 

STRINGS 

INSTR * 

POINT 

TIMES * 
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f 

token 


U6BE 

k6d 


L6K 

kulcsszd 


token 


kod 


kulcsszd 


token 


kod 


kulcsszd 


dec 


hex 




dec 


hex 




dec 


hex 




200 


C8 


PI 


218 


DA 


FRE 


235 


EB 


LOF » 


201 


C9 


INKEY1 


219 


DB 


INP 


236 


EC 


MKII * 


202 


CA 


THEN 


220 


DC 


POS 


237 


ED 


MKS1 * 


203 


CB 


NOT 


221 


DD 


SQR 


238 


EE 


MKDS * 


204 


CC 


STEP 


222 


DE 


RND 


239 


EF 


CINT 


205 


CD 


+ 


223 


DF 


LOG 


240 


FO 


CSNS 


206 


CE 


_ 


224 


EO 


EXP 


241 


Fl 


CDBL 


207 


CF 


* 


225 


El 


COS 


242 


F2 


FIX 


208 


DO 


/ 


226 


E2 


SIN 


243 


F3 


LEN 


209 


Dl 


t 


227 


E3 


TAN 


244 


F4 


STRS 


210 


D2 


AND 


228 


E4 


ATN 


245 


F5 


VAL 


211 


D3 


OR 


229 


E5 


PEEK 


246 


F6 


ASC 


212 


D4 


> 


230 


E6 


CVI * 


247 


F7 


CHRS 


213 


D5 


= 


231 


E7 


CVS » 


248 


F8 


LEFTS 


214 


D6 


< 


232 


E8 


CVD * 


249 


F9 


RIGHTS 


215 


D7 


SGN 


233 


E9 


EOF * 


250 


FA 


MIDI 


216 


D8 


INT 


234 


EA 


LOC « 


251 


FB 


f 


217 


D9 


ABS 















A felsorolt szavak a BASIC kulcsszavai, ezert valtozonevek- 
kent nera alkalmazhatdk. A kulcsszavak a valtozdnevek belsejeben 
sem fordulhatnak el 6. 
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Kulcsszavak 6s rtveleti jelek ABC sorrendbe rendezve 



kulcsszo 


token 


kod 


kulcsszd 


token 


k6d 


kulcsszd 


token 


kod 




dec 


hex 




dec 


hex 




dec 


hex 


F 


251 


FB 


END 


128 


80 


OR 


211 


D3 


* 


207 


CF 


EOF » 


233 


E9 


OUT 


160 


AO 


+ 


205 


CD 


EM- 


194 


C2 


PEEK 


229 


E5 


_ 


206 


CE 


ERR 


195 


C3 


PI 


200 


C8 


/ 


208 


DO 


ERROR 


158 


9E 


POINT 


198 


C6 


< 


214 


D6 


EXP 


224 


EO 


POKE 


177 


Bl 




213 


D5 


FIELD « 


163 


A3 


POS 


220 


DC 


> 


212 


D4 


FIX 


242 


F2 


PRINT 


178 


B2 


t 


209 


Dl 


FOR 


129 


81 


PUT « 


165 


A5 


ABS 


217 


D9 


FN * 


190 


BE 


RANDOM 


134 


86 


AND 


210 


D2 


FRE 


218 


DA 


READ 


139 


8B 


ASC 


246 


F6 


GET * 


164 


A4 


REM 


147 


93 


ATN 


228 


E4 


GOSUB 


145 


91 


RESET 


130 


82 


AUTO 


183 


B7 


GOTO 


141 


8D 


RESTORE 


144 


90 


BEEP 


156 


9C 


IF 


143 


8F 


RESUME 


159 


9F 


CALL 


193 


CI 


INKEYI 


201 


C9 


RETURN 


146 


92 


CDBL 


241 


Fl 


INP 


219 


DB 


RIGHT! 


249 


F9 


CHRS 


247 


F7 


INPUT 


137 


89 


RND 


222 


DE 


CINT 


239 


EF 


INSTR » 


197 


C5 


RUN 


142 


8E 


CLEAR 


184 


B8 


INT 


216 


D8 


SAVE 


173 


AD 


CLOAD * 


185 


B9 


KILL « 


, 170 


AA 


SCREEN 


174 


AE 


CLOSE 


166 


A6 


LEFTS 


248 


F8 


SET 


131 


83 


CLS 


132 


84 


LEN 


243 


F3 


S6N 


215 


D7 


CHD » 


133 


85 


LET 


140 


BC 


SIN 


226 


E2 


CONT 


179 


B3 


LIST 


180 


B4 


SQR 


221 


DD 


COS 


225 


El 


LLIST 


181 


B5 


STEP 


204 


CC 


CREATE 


171 


AB 


LOAD 


167 


A7 


STOP 


148 


94 


CSAVE « 


186 


BA 


LOC * 


234 


EA 


STRS 


244 


F4 


CSNG 


240 


FO 


LOF « 


235 


EB 


STRINGS 


196 


C4 


CVD » 


232 


E8 


LOG 


223 


DF 


TAB( 


188 


BC 


CVI * 


230 


E6 


LPRINT 


175 


AF 


TAN 


227 


E3 


CVS » 


231 


E7 


MERGE » 


168 


A8 


TEST 


169 


A9 


DATA 


136 


88 


MIDI 


250 


FA 


THEN 


202 


CA 


DEF * 


176 


BO 


MKDS » 


238 


EE 


TIMES * 


199 


C7 


DEFDBL 


155 


9B 


MKIf * 


236 


EC 


TO 


189 


BD 


DEF I NT 


153 


99 


MKSS * 


237 


ED 


TROFF 


151 


97 


DEFSNG 


154 


9A 


NEW 


187 


BB 


TRON 


150 


96 


DEFSTR 


152 


98 


NEXT 


135 


87 


USING 


191 


BF 


DELETE 


182 


B6 


NOT 


203 


CB 


VAL 


245 


F5 


DIM 


138 


8A 


ON 


161 


Al 


VARPTR 


192 


CO 


EDIT 


157 


9D 


OPEN 


162 


A2 


fn * 


172 


AC 


ELSE 


149 


95 
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Hexadecimal is - decimalis konv*rzi6s tabla 



FOGGELtK 





16 3 




16 2 




16 1 




16° 


HEX 


DEC 


HEX 


DEC 


HEX 


DEC 


HEX 


DEC 


























1 


4 096 


1 


256 


1 


16 


1 


1 


2 


8 192 


£. 


512 


2 


32 


2 


2 


3 


12 288 


3 


768 


3 


48 


3 


3 


4 


1& 384 


4 


1 024 


4 


64 


4 


4 


5 


20 480 


5 


1 280 


5 


80 


5 


5 


6 


24 576 


& 


1 536 


& 


96 


6 


6 


7 


28 672 


7 


1 792 


7 


112 


7 


7 


8 


32 768 


8 


2 048 


8 


128 


8 


8 


9 


36 864 


9 


2 304 


9 


144 


9 


9 


A 


40 960 


A 


2 560 


A 


160 


A 


10 


B 


45 056 


B 


2 816 


B 


176 


B 


11 


C 


49 152 


C 


3 072 


C 


192 


C 


12 


D 


53 248 


D 


3 328 


D 


208 


D 


13 


E 


57 344 


E 


3 584 


E 


224 


E 


14 


F 


61 440 


F 


3 840 


F 


240 


F 


15 



2 es 1& hatvanyai 




256 


8 


512 


9 


1 024 


10 


2 048 


11 


4 096 


12 


8 192 


13 


16 384 


14 


32 768 


15 


65 536 


16 


131 072 


17 


262 144 


18 



2° =16° 
2* = 16* 
2° =16 2 
2 12 =16 3 
2 16 =16* 
2 2 °=16 B 
2 a *= 16 s 
2 5so =16 r 
2 32 =16° 
2 3e =16" 
2*°=16 1< 




1 

16 

256 



4 096 




65 536 


4 


1 048 576 


5 


16 777 216 


6 


268 435 456 


7 


4 294 967 296 


8 


68 719 476 736 


9 


1 099 511 627 776 


10 
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Decimal is - h*xadeciaalis konverzite tibia 








1 


2 


3 


4 


5 


6 


7 


8 


9 








1 


2 


3 


4 


5 


6 


7 


8 


9 


10 


A 


B 


C 


D 


E 


F 


10 


11 


12 


13 


20 


14 


15 


16 


17 


18 


19 


1A 


IB 


1C 


ID 


30 


IE 


IF 


20 


21 


22 


23 


24 


25 


26 


27 


40 


28 


29 


2A 


2B 


2C 


2D 


2E 


2F 


30 


31 


50 


32 


33 


34 


35 


36 


37 


38 


39 


3A 


3B 


60 


3C 


3D 


3E 


3F 


40 


41 


42 


43 


44 


45 


70 


46 


47 


48 


49 


4A 


4B 


4C 


4D 


4E 


4F 


80 


50 


51 


52 


53 


54 


55 


56 


57 


58 


59 


90 


5A 


5B 


5C 


5D 


5E 


5F 


60 


61 


62 


63 


100 


64 


65 


66 


67 


68 


69 


6A 


6B 


6C 


6D 


110 


6E 


6F 


70 


71 


72 


73 


74 


75 


76 


77 


120 


78 


79 


7A 


7B 


7C 


7D 


7E 


7F 


80 


81 


130 


82 


83 


84 


85 


86 


87 


88 


89 


8A 


8B 


140 


BC 


8D 


8E 


8F 


90 


91 


92 


93 


94 


95 


150 


96 


97 


98 


99 


9A 


9B 


9C 


9D 


9E 


9F 


160 


AO 


Al 


A2 


A3 


A4 


A5 


A6 


A7 


A8 


A9 


170 


AA 


AB 


AC 


AD 


AE 


AF 


BO 


Bl 


B2 


B3 


180 


B4 


B5 


B6 


B7 


B8 


B9 


BA 


BB 


BC 


BD 


190 


BE 


BF 


CO 


CI 


C2 


C3 


C4 


C5 


C6 


C7 


200 


C8 


C9 


CA 


CB 


CC 


CD 


CE 


CF 


DO 


Dl 


210 


D2 


D3 


D4 


D5 


D6 


D7 


D8 


D9 


DA 


DB 


220 


DC 


DD 


DE 


DF 


EO 


El 


E2 


E3 


E4 


E5 


230 


E6 


E7 


E8 


E9 


EA 


EB 


EC 


ED 


EE 


EF 


240 


FO 


Fl 


F2 


F3 


F4 


F5 


F6 


F7 


F8 


F9 


250 


FA 


FB 


FC 


FD 


FE 


FF 


100 


101 


102 


103 







1 


2 


3 


4 


5 


6 


7 


8 


9 
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Hexadcciailis dsszeadttibla 






1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 


1 


02 


03 


04 


05 


06 


07 


08 


09 


OA 


OB 


OC 


OD 


OE 


OF 


10 


2 


03 


04 


05 


06 


07 


08 


09 


OA 


OB 


OC 


OD 


OE 


OF 


10 


11 


3 


04 


05 


06 


07 


08 


09 


OA 


OB 


OC 


OD 


OE 


OF 


10 


11 


12 


4 


05 


06 


07 


08 


09 


OA 


OB 


OC 


OD 


OE 


OF 


10 


11 


12 


13 


5 


06 


07 


08 


09 


OA 


OB 


OC 


OD 


OE 


OF 


10 


11 


12 


13 


14 


6 


07 


08 


09 


OA 


OB 


OC 


OD 


OE 


OF 


10 


11 


12 


13 


14 


15 


7 


08 


09 


OA 


OB 


OC 


OD 


OE 


OF 


10 


11 


12 


13 


14 


15 


16 


8 


09 


OA 


OB 


OC 


OD 


OE 


OF 


10 


11 


12 


13 


14 


15 


16 


17 


9 


0A 


OB 


OC 


OD 


OE 


OF 


10 


11 


12 


13 


14 


15 


16 


17 


18 


A 


OB 


OC 


OD 


OE 


OF 


10 


11 


12 


13 


14 


15 


16 


17 


18 


19 


B 


OC 


OD 


OE 


OF 


10 


11 


12 


13 


14 


15 


16 


17 


18 


19 


1A 


C 


OD 


OE 


OF 


10 


11 


12 


13 


14 


15 


16 


17 


18 


19 


1A 


IB 


D 


OE 


OF 


10 


11 


12 


13 


14 


15 


16 


17 


18 


19 


1A 


IB 


1C 


E 


OF 


10 


11 


12 


13 


14 


15 


16 


17 


18 


19 


1A 


IB 


1C 


ID 


F 


10 


11 


12 


13 


14 


15 


16 


17 


18 


19 


1A 


IB 


1C 


ID 


IE 



HexadeciM&lis szorzdtabla 



1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 


2 


04 


06 


08 


OA 


OC 


OE 


10 


12 


14 


16 


18 


1A 


1C 


IE 


3 


06 


09 


OC 


OF 


12 


15 


18 


IB 


IE 


21 


24 


27 


2A 


2D 


4 


08 


OC 


10 


14 


18 


1C 


20 


24 


28 


2C 


30 


34 


38 


3C 


5 


OA 


OF 


14 


19 


IE 


23 


28 


2D 


32 


37 


3C 


41 


46 


4B 


6 


OC 


12 


18 


IE 


24 


2A 


30 


36 


3C 


42 


48 


4E 


54 


5A 


7 


OE 


15 


1C 


23 


2A 


31 


38 


3F 


46 


4D 


54 


5B 


62 


69 


8 


10 


18 


20 


28 


30 


38 


40 


48 


50 


58 


60 


68 


70 


78 


9 


12 


IB 


24 


2D 


36 


3F 


48 


51 


5A 


63 


6C 


75 


7E 


87 


A 


14 


IE 


28 


32 


3C 


46 


50 


5A 


64 


6E 


78 


82 


8F 


9C 


B 


16 


21 


2C 


37 


42 


4D 


58 


63 


6E 


79 


84 


BC 


9A 


A8 


C 


18 


24 


30 


3C 


48 


54 


60 


6C 


78 


84 


90 


96 


A5 


B4 


D 


1A 


27 


34 


41 


4E 


58 


68 


75 


82 


8F 


9C 


A9 


B6 


C3 


E 


1C 


2A 


38 


46 


54 


62 


70 


7E 


8C 


9A 


A8 


B6 


C4 


D2 


F 


IE 


2B 


3C 


48 


5A 


69 


78 


87 


96 


A5 


B4 


C3 


D2 


El 
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Program listAk 



A Fuggelek hAtralevo reszeben a PRIHO periferia kezeld prog- 
ramjainak forrAsnyelvi listAi talAlhatok. A listAkat azert 
kozoljukf hogy az egyes rutinok hasznaLataval kapcsolatos resz- 
letkerdesekre a Z-BO gepi kodtii programozAsAban jArtas FelhasznA- 
16k a progranok AttanulnAnyozAsAval vAlaszt kaphassanak. 

A progranok ListAiban L At hat 6 cimek mindig az adott rutin 
elso utasitAsAhoz viszonyitott relativ cimek. Igy a rutin kezdo- 
cinenek ismereteben bArmely utasitAs ntemoria cime neghatArozhat6. 

Az itt kovetkezd rutinok a PRIHO '84. 1-es verziojAban 
mflLkodnek. A PRIHO tovAbbfeJlesztes£vel az alkalmazott megoldAsok f 
egy modulon belul a szubrutinok elhelyezkedese* a munkavAltozok 
nemoria cime, stb. negvAltozhatnak. Annak erdekeben* hogy ezek a 
modositAsok ne befolyAsoljAk a FelhasznAl6k programjait, kerjuk, 
hogy a rutinokat csak a definiAlt belepesi ponton - ugrotAbla - 
keresztul hivjAk, tovAbbA a modulokban talAlhat6 prograareszeket, 
egyedi szubrutinokat ne hasznAljAk. Az ugr6tAbla megkerulesevel 
vegrehajtott bArnely hivAs illegAlis, az ebbdl eredd problemAk 
kizAr6lag a FelhasznAl6t terhelik. 
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SYSTEM - PRIHO ROH START V: , 84.1 



0000' 

0001' 

0003' 

0005' 

0008' 

000B' 

000D' 

0010' 

0013' 

0015' 

0018' 

001B' 

001D' 

0020' 

0023' 

0025' 

0028' 

002B' 

002D' 

0030' 

0033' 

0035' 

0038' 

003B' 



31 

18 08 
C3 0000* 
C3 0000* 
0000* 
C3 0000* 
C3 0000* 
0000* 
C3 0000* 
C3 0000* 
0000* 
C3 0000* 
C3 0000* 
0000* 
C3 0000* 
C3 0000* 

C3 0000* 
C3 0000* 

C3 0000* 
C3 0000* 



EXT ARAMEN, CLOCK, CLRDOT, DATUM, DCB, DIRCUR, DSPHND 

EXT ENDREC, FRERAM, 6LINE, INBYTE, KKBHND, KURPOZ 

EXT KYBHND, NMIEND, PRGREC, PRTHND, PWRON, RDHEAD 

EXT RESET,SETDOT,TSTDOT,VERZIO, VJPRAM, VRST08 

EXT VRST10,VRST18,VRST20,VRST28,VRST30,VRST38 

EXT WRHEAD,WRREC 



BASIC ROM START 



CHKSUM: 

JPRAM: 
RST08: 

PWRONO: 

RST10: 

DRAMST: 

DISP: 

RST18: 

KYB: 
RST20: 

KKYB: 
RST28: 

PRT: 
RST30: 

GETLIN: 
RST38: 



DEFB 31H 


?LD SP,— 


DEFS 2 


;16 KBYTE CHECK-SUM 


JR PWRONO 




JP VJPRAM 


;USER JUMP 


JP VRST08 




DEFM FRERAM 


j SYSTEM RAM END+1 


JP PWRON 


; POWER-ON RESET 


JP VRST10 




DEFW ARAMEN 


;DRAM NORMAL START 


JP DSPHND 


; DISPLAY HANDLER 


JP VRST18 




DEFW DCB 


;DCB CIME 


JP KYBHND 


; KEYBOARD SCANN 


JP VRST20 




DEFW CLOCK 


; CLOCK, STIME CIME 


JP KKBHND 


; KEYBOARD WAIT 


JP VRST28 




DEFS 2 




JP PRTHND 


; PRINTER HANDLER 


JP VRST30 




DEFS 2 




JP GLINE 


;EGY SOR BE 


JP VRST38 




DEFS 2 





MASZKTABLA A PONT MUVELETEKHEZ 



003D' 80 40 20 10 
0041' 08 04 02 01 
0045' 



MTAB: 



DEFB 80H,40H,20H,10H,8,4,2,1 
DEFS 18 



0057' 
0058' 
0059' 
005B' 
005C' 
005D' 
005F' 



El 
Fl 

ED 45 
El 
Fl 

DB 03 
E6 02 



NMI2: 

NMI3: 
NMI4: 



POP HL 

POP AF 
RETN 

POP HL 

POP AF 

IN A, (3) 

AND 2 



;STATUSZ VISSZAALLITAS 

; IT ENGEDELYEZES + RET 
;STATUSZ TORLESE 



; RESET 60MB AKTIV MEG? 
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0061' 


20 


FA 




JR 


NZ,NMI4 


;=IGEN, VARJ MEG! 


0063' 


C3 


0000» 




JP 


RESET 


; SYSTEM RESET 








■ NMI - NHI KISZOLGALO RUTIN 




0066' 


F5 




Mil: 


PUSH 


AF 


;STATUSZ MENTES 


0067' 


E5 






PUSH 


HL 




0068' 


21 


0000* 




LD 


HL, CLOCK 


;ORA-L BYTE CIME 


006B' 


34 






INC 


(HL) 


; CLOCK (-CLOCK+ 1/50 SEC 


006C' 


20 


07 




JR 


NZ,NMI1 


j=NINCS ATVITEL 


006E' 


2A 


0001* 




LD 


HL, (CLOCK+1) 


0071' 


23 






INC 


HL 


;CLOCK-H,M NOVELES 


0072' 


22 


0001* 




LD 


(CLOCK+1), 


HL 


0075' 


DB 


07 


NMI1: 


IN 


A, (7) 




0077' 


E6 


02 




AND 


2 


; RESET GOMB AKTIV? 


0079' 


CA 


0000* 




JP 


Z,NMIEND 


;=NEM 


007C 


18 


DD 


m 
f 


JR 


NMI3 




007E' 


00« 


» 


DEFB 


DATUM 


;6ENERALAS EVE 


007F' 


00* 




DEFB 


VERZIO 


;VERZIOSZAM 








■ SYSTEM 


JUMP TABLA 




0080' 


C3 


0000* 




JP 


DIRCUR 


;DIREKT KURZOR CIMZES 


0083' 


C3 


0000* 




JP 


SETDOT 


;SET PONT 


0086' 


C3 


0000* 




JP 


CLRDOT 


; RESET PONT 


0089' 


C3 


0000* 




JP 


TSTDOT 


;TEST PONT 


008C' 


C3 


0000* 




JP 


KURPOZ 


;A(-AKT.KUR.POZ 


008F' 


C3 


0000* 




JP 


RDHEAD 


; HEADER OLVASAS 


0092' 


C3 


0000* 




JP 


WRHEAD 


; HEADER IRAS 


0095' 


C3 


0000* 


' 


JP 


WRREC 


;BLOKK K I IRAS 


0098' 


C3 


0000* 




JP 


PRGREC 


;PROG.BLOKK OLVASAS 


009B' 


C3 


0000* 




JP 


ENDREC 


;END.BLOKK KIIRAS 


009E' 


C3 


0000* 




JP 


INBYTE 


;BYTE BEOLVASAS 








; VBLANK - 


- VARAKOZAS KEP-VISSZAFUTASRA 


00A1' 


F5 




VBLANK: 


PUSH 


AF 


;STATUSZ MENTES 


00A2' 


DB 


OF 


VBLK1: 


IN 


A, (15) 




00A4' 


E6 


20 




AND 


20H 


;VISSZAFUTAS? 


00A6' 


28 


FA 




JR 


Z,VBLK1 


;=NEM, VARJ MEG 


00A8' 


Fl 






POP 


AF 




00A9' 


C9 






RET 







F-55 



FOGGELfeK 



INIT - POHER-dH RESET RUTIN V:'84.1 



\1iAS 


tA 1 ftKflntWf L1WW 

EXT BASIC, DSPHND, 


If U£WW1( i^jvwi i 

CLS,NMI2,BRESET 


i/ 


m 
» 








0000' C9 


UTRET: 


RET 








■ PWRON - 


POWER-ON RESET 




0001' 31 0000* 


PWRON: 


LD 


SP,ARAMEN 


;RAM TETEJE 


0004* CD 0030' 




CALL 


INIT 


; INICIALIZALAS 


0007' 3A 1000 


CHKROM: 


LD 


A, (1000H) 




000A' FE 00* 




CP 


C1000H 




OOOC C2 1000 




JP 


NZ, 1000H 


;=*1 TOK NEM BASIC 


OOOF' 3A 2000 




LD 


A, (2000H) 




0012 f FE 00* 




CP 


C2000H 




0014' C2 2000 




JP 


NZ,2000H 


;=*2 TOK NEM BASIC 


0017' 3A 3000 




LD 


A,<3000H> 




001 A' FE 00* 




CP 


C3000H 




001C C2 3000 




JP 


NZ,3000H 


;=*3 TOK NEM BASIC 


001F' C3 0000* 




JP 


BASIC- 

^66 


; BASIC PWRON 




; RESET - 


- SYSTEM 


RESET < RESET GOMB) 


0022' 2A 401F 


RESET: 


LD 


HL,(VRESET+1) 


0025' E5 




PUSH 


HL 


; RESET END CIME 


0026' CD 0030' 




CALL 


INIT 


;RAM INICIALIZALAS 


0029' El 




POP 


HL 


; RESET END CIME 


002A' 22 401F 




LD 


(VRESET+1) 


,HL 


002D' C3 401E 




JP 


VRESET 


; RESET END EXEC. 




• INIT - 


RAM TERULET INICIALIZALAS 


0030' ED 56 


INIT: 


IN 


1 


;IT TIPUSA 


0032' F3 




DI 




;IT TILOS 


0033' 21 0073' 




LD 


HL,RAMINI 


;RAM KONSTANSOK 


0036' 11 4000 




LD 


DE, 4000H 


;RAM START CIM 


0039' 01 003C 




LD 


BC,60 




003C ED BO 




LDIR 


;UGROTABLA INIT 


003E' AF 




XOR 


A 


f A<-0 


003F' 06 44 




LD 


B,68 


;403CH..407FH<-0 


0041' 12 


INIT1: 


LD 


(DE),A 




0042' 13 




INC 


DE 




0043' 10 FC 




DJNZ INIT1 


;=VAN MEG BYTE 


0045' DD 21 4042 




LD 


IX,DCB 


;DCB CIM 


0049' 21 1840 




LD 


HL, 1840H 




004C' 22 4045 




LD 


(DCB+3),HL 


004F' 3E 00* 




LD 


A,ARAMEN/256 


0051' 32 404A 




LD 


(DCB+8),A 


;DRAM START-H 


0054' 21 FFFF 




LD 


HL,OFFFFH 





F-56 



0057' 


22 


404D 




LD 


<DCB+11),HL 


— t-UtitifcL 


£K ■ 


005A' 


21 


3A50 




LD 


HL,3A50H 






005D' 


22 


4050 




LD 


(DCB+14),HL; 


PRTHND I NIT 


0060' 


21 


42E9 




LD 


HL,42E9H 






0063' 


22 


405A 




LD 


(DCB+24),HL 






0066' 


3A 


403B 




LD 


A, (PORT) ; 


HW PORT 


INIT 


0069' 


D3 


OB 




OUT 


(11), A 






006B' 


3E 


01 




LD 


A,l ; 


DSP {-NORMAL 


006D' 


CD 


0000* 




CALL 


DSPHND 






0070' 


C3 


0000* 




JP 


CLS ; 


DSP TORLESE 


0073' 


C3 


1C96 


RAMINI: 


JP 


1C96H ; 


RST 08H 




0076' 


C3 


1D78 




JP 


1D78H ; 


RST 10H 




0079' 


C3 


1C90 




JP 


1C90H ; 


RST 18H 




007C 


C3 


25D9 




JP 


25D9H ; 


RST 20H 




007F' 


C3 


0000' 




JP 


UTRET j 


RST 28H 




0082' 


C3 


0000' 




JP 


UTRET ; 


RST 30H 




0085' 


C3 


0000' 




JP 


UTRET ; 


RST 38H 




0088' 


C3 


0000' 




JP 


UTRET ; 


VJPRAM 




008B 1 


C3 


0000* 




JP 


NMI2 | 


NMIEND 




008E' 


C3 


0000* 




JP 


NMI2 






0091' 


C3 


0000* 




JP 


BRESET , 


VRESET 




0094' 


C3 


0000' 




JP 


UTRET 






0097' 


C3 


0000* 




JP 


UTRET 






009A' 


C3 


0000' 




JP 


UTRET i 


;EXIT1 




009D' 


C3 


0000 




JP 









OOA0' 


C3 


0000 




JP 









00A3' 


' C3 


0000 




JP 









00A6' 


C3 


0000 




JP 









00A9' 


' C3 


0000 




JP 









OOAC' 


0000* 




DEFW 


ARAMEN 


; RAMEND 




OOAE 


' ED 






DEFB 


OEDH 


;PORT 










• RAM 


TERULET 


(4000H..407FH) 




4000 






VRSTOB 


EQU 


4000H 


;RST 08H 


VEKTOR 


4003 






VRST10 


EQU 


4003H 


;RST 10H 


VEKTOR 


4006 






VRST18 


EQU 


4006H 


;RST 18H 


VEKTOR 


4009 






VRST20 


EQU 


4009H 


;RST 20H 


VEKTOR 


400C 






VRST28 


EQU 


400CH 


;RST 28H 


VEKTOR 


400F 






VRST30 


EQU 


400FH 


;RST 30H 


VEKTOR 


4012 






VRST38 


EQU 


4012H 


;RST 38H 


VEKTOR 


4015 






VJPRAM 


EQU 


4015H 


;USER JP 


VEKTOR 


4018 






IMMIEND 


EQU 


4018H 


;(JP NMI2) 


OOAF 


t 






DEFS 


2 






401E 






VRESET 


EQU 


401 EH 


j RESET VE6E 


00B1 


t 






DEFS 


4 






4027 






EXIT1 


EQU 


4027H 


; KEYBOARD SPEC. MOD 


00B5 


r 




r 

« 
f 


DEFS 


15 







F-57 



FOBBELtK 



4039 
403B 

403D 
4042 
4062 



4072 



RAMEND 
PORT 


EQU 
EQU 


4039H ; 
403BH j 


DRAM START CIM 
SYSTEM OUTPUT PORT 
jFENNTARTVA 


CLOCK 

DCB 

NAMERM 

■ 


EQU 
EQU 
EQU 


403DH 
4042H 
4062H 


(CLOCK -L,-M,-H 
(DEVICE CONTROL BLOCK 
(FILE-NEV PUFFER 


■ 

FRERAM 


EQU 


4072H 





F-58 



FOGGELtK 



DSPHND - DISPLAY HANDLER V:'84.1 



Me ye<S 

35 o^ H 



k, EXT DCB,KARR0M,KGKR0M,P0RT,CLRVK9,SETD1 
be ENTRY DSPHND,CURNEG,CUROFF,HANG 



DISPLAY HANDLER 

16 SOR, SORONKENT 42 KARAKTER (256*192 PONT) 
NORHAL ES ELONGALT KARAKTEREK ( E.K.=2 N.K. ) 
NORHAL KARAKTER 12*6 PONTOS HEZOBEN ELHELYEZ- 
KEDO 6*8 PONT. INVERTALT ALAP ESETEN AZ 11*6 
PONT TERULETU. SULLYESZTETT KARAKTEREK 2 SOR- 
RAL LEJJEBB HELYEZKEDNEK EL. FUG60LEGES IRAS 
ESETEN 21 SOR, SORONKENT 32 KARAKTER LEHETSE- 
GES. FUGGOLEGES IRASNAL CSAK A 10H ES 11H VE- 
ZERLO KODOK AKTIVAK. HA ILYENKOR A SOR VEGERE 
ER ( KEP FELSO SZELE ), AZ IRAST AZ ADOTT SOR 
ELEJEN FOLYTATJA. 
MEGJELENITHETO KODOK: 1EH..7FH - NORMAL ROM 

80H..FFH - OPC. ROM/RAM 
VEZERLO KODOK: 



CTRL/B 
CTRL/C 
CTRL/D 
CTRL/E 
CTRL/F 
CTRL/G 

<- 
SHIFT/-) 



CLS 

RETURN 

CTRL/N 

CTRL/0 

CTRL/P 

CTRL/Q 

CTRL/R 

CTRL/S 

CTRL/T 

CTRL/U 

CTRL/V 

CTRL/W 



01 - 


NORMAL 


02 - 


ELONGACIO 


03 - 


FEHER HATTER 


04 - 


INVERZ ALAP 


05 - 


UNDERLINE 


06 - 


PRE-CLEAR 


07 - 


BELL 


08 - 


BACK STEP 


09 - 


HORIZONTAL TAB 


OA - 




OB - 




OC - 


CLEAR SCREEN 


OD - 


CR t LF 


OE - 


ONLY CR 


OF - 


FUGGOLEGES IRAS 


10 - 


ALSO INDEX 


11 - 


FELSO INDEX 


12 - 


ELONGACIO KI 


13 - 


FEHER HATTER KI 


14 - 


INVERZ ALAP KI 


15 - 


UNDERLINE KI 


16 - 


PRE-CLEAR KI 


17 - 


VIZSZINTES IRAS 


18... ID 


— 


REGISZTEREK: 


BE: 


(A)= ASCII KOD 


KI: 


(A),<BC),<DE),<HL)= « 




(F)= <A> SZERINT 



F-59 



FOGBELfeK 







i STK: 


24 BYTE 




OOOO' FD E5 


DSPHND: 


PUSH IY 




0002' E5 




PUSH HL 




0003' D5 




PUSH DE 




0004' C5 




PUSH BC 




0005' D6 IE 




SUB 1EH 




0007' F5 




PUSH AF 




0008' 21 0005* -^^k5S 


LD HUDCB+5 




OOOB' 38 3C 




JR C, DSPVK 




OOOD* 7E 




LD A, (HL) 




OOOE' E6 18 ^eH 
0010' C4 00D8» 


oWs 0000*- H02 


AND 18H 




Uei^e-St 


CALL NZ,VK084 




0013' DD CB 05 76 




BIT 6, (IX+5) 




0017' C4 01D1' 




CALL NZ,UNDKAR 




001A' FD 21 0000* 




LD IY,KARROM 




001E' Fl 




POP AF 




001F' F5 




PUSH AF 




0020' FE 62 




CP 62H 




0022' 38 06 




JR CfDSPl 




0024' D6 62 




SUB 62H 




0026' FD 2A 0009* 




LD IY, (DCB+9) 




002A' 26 00 


DSP1: 


LD H,0 




002C 87 




ADD A, A 




002D' 6F 




LD L,A 




002E' 29 




ADD HL,HL 




002F' 29 




ADD HL»HL 




0030' EB 




EX DE,HL 




0031* FD 19 




ADD IY,DE 




0033' CD 01D5' 




CALL KAR6EN 




0036' ED 53 0006* 




LD (DCB+6),DE 




003A' 1C 




INC E 




003B' ID 




DEC E 




003C CC 014A' 




CALL Z,VKOD 




003F' Fl 


DSP2: 


POP AF 




0040' C6 IE 




ADD A, 1EH 




0042' B7 




OR A 




0043' CI 




POP BC 




0044* Dl 




POP DE 




0045' El 




POP HL 




0046' FD El \ / ~ wa \,\p\, I,",', 


POP IY 

mp£T . 


i - 


0049' C6 IE 


DSPVK: 


ADD A, 1EH 


004B' 47 




LD B f A 


\fCzb^o 


004C' 11 003F' 




LD DE,DSP2 


i 


w 004F' D5 
0050' 10 15 




PUSH DE 
DJNZ VK02-2 


Kte- 


0052' CD 0269' 


VKOlx 


CALL CUROFF 




0055' 21 0005* 




LD HLrDCB+5 




0058' CD 01A6' 




CALL VK13 



v cicy)c 



;REGISZTER MENTES 



1E->0..7F->61 
MODOSITOTT KOD 
FLAB-BYTE CINE ^■■•feii 
=VEZERLO KOD 
FLA6-BYTE 

PRE-CLEAR, INV.ALAP? 
=I6EN, ALAP RAJZOLAS 
UNDERLINE? olo.hOi?«S 
=I6EN, RAJZOLAS 
NORM. KAR. ROM CIME 
REL.KAR.ROM CIM 

FELHASZNALOI KAR.? 
=1E..7F, NORM. ROM 
80->0..FF->7F 
OPC.KAR.ROM CIME 
*ROM CIM SENERALAS* 

;HL<-2*REL.CIM 

;(HL)=8*REL.CIM 

;(IY)=KAR.ROM CIM 
;KAR. RAJZOLAS 
;SOR/OSZLOP-CIM MENT 

;ELERT A SOR VEGERE? 
;=IGEN, CR(ROLL) 
j MODOSITOTT KOD 
;<A)=EREDETI KOD 
;CY(-0 (PICTURE) 
;REGISZTER VISSZAMENT 



;RET DSPHND 
;EREDETI KOD 
;SZLO KEZDOERTEK 
;FOLYTATASI CIM 



=NEM 01 (NORMAL) 
KURZOR KIKAPCSOLASA 
FLAG-BYTE CIME 
FEHER HATTER KI 



F-60 



005B' 


36 


00 




005D' 


2B 






005E' 


CB 


96 




0060' 


21 


0000* 




0063' 


22 


0009* 




0066' 


C9 






0067' 


10 


03 




0069' 


CB 


FE 


VK02: 


006B' 


C9 






006C' 


10 


23 




006E' 


CB 


6E 


VK03: 


0070' 


CO 






0071' 


CB 


EE 




0073' 


01 


0018 


VK031 


0076' 


DD 


66 08 




0079' 


68 






007A' 


7E 




VK032 


007B' 


2F 






007C 


77 






007D' 


23 






007E' 


10 


FA 




0080' 


OD 






0081' 


20 


F7 




0083' 


21 


0005* 


VK033 


0086' 


7E 






0087' 


17 






0088' 


AE 






0089' 


E6 


20 




008B' 


CB 


8E 




008D' 


C8 






008E» 


CB 


CE 




0090' 


C9 






0091' 


10 


07 




0093' 


CB 66 


VK04: 


0095' 


CO 






0096' 


CB 


E6 




0098' 


18 


E9 




009A' 


10 


03 




009C 


CB 


F6 


VK05: 


009E' 


C9 






009F' 


10 


05 




00A1' 


CB 


DE 


VK06: 


00A3' 


CB 


D6 




00A5' 


C9 






00A6' 


10 


11 




00A8' 


11 


7500 


VK07: 


OOAB' 


3A 


0000* 


HANG: 


OOAE' 


42 




VK071 


OOAF' 


EE 


10 




00B1' 


D3 


03 





LD 


(HL),0 ; 


- l-UWafcLEK 

FLAG-BYTE ( -ALAPERTEK 


DEC 


HL ; 


KLAVIATURA FLAG-BYTE 


RES 


2, (HL) ; 


KURZOR FLAG(-0 


LD 


HL,KGKROM ; 


80H FELETT A KGKROM 


LD 


(DCB+9),HL ; 


MUKODJON 


RET 






DJNZ 


VK03-2 ; 


=NEM 02 (ELONGACIO BE) 


SET 


7 f (HL) ; 


ELONGACIO BE 


RET 






DJNZ 


VK04-2 ; 


=NEM 03 (FEHER HATTER) 


BIT 


5 f (HL) ; 


FEHER A HATTER? 


RET 


NZ ; 


=MAR FEHER 


SET 


5, (HL) j 


FEHER HATTER BE 


LD 


BC,24 ; 


6144=24*256 


LD 


H,(IX+8) j 


DRAM-START-H 


LD 


L f B 




LD 


A, (HL) ; 


DRAM KOMPLEMENT 


CPL 






LD 


(HL),A 




INC 


HL j 


, POINTER ELORE 


DJNZ 


VK032 


;=VAN MEG 


DEC 


C 




JR 


NZ,VK032 


;=VAN MEG 


LD 


HL,DCB+5 


; FLAG-BYTE CIME 


LD 


A, (HL) 


;HA A FEHER HATTER ES 


RLA 




;AZ INVERZ ALAP FLAG 


XOR 


(HL) 


fERTEKE ELTER, AKKOR 


AND 


20H 


; INVERZ RAJZ FLAG(-1, 


RES 


1,(HL) 


fEGYEBKENT FLAG(-0 


RET 


Z 


;=NORMAL RAJZOLAS 


SET 


1,(HL) 


j INVERZ RAJZOLAS 


RET 






DJNZ 


VK05-2 


;=NEM 04 (INVERZ ALAP) 


BIT 


4, (HL) 


■ t INVERZ ALAP? 


RET 


NZ 


;=MAR INVERZ 


SET 


4, (HL) 


; INVERZ ALAP BE 


JR 


VK033 


; INVERZ RAJZ F. BEALL. 


DJNZ 


VK06-2 


;=NEM 05 (UNDERLINE) 


SET 


6,(HL) 


; UNDERLINE BE 


RET 






DJNZ 


VK07-2 


;=NEM 06 (PRE-CLEAR) 


SET 


3, (HL) 


;PRE-CLEAR<-1 


SET 


2, (HL) 


;PRE-CLEAR-PUF.(-1 


RET 






DJNZ 


VK08-2 


;=NEM 07 (BELL) 


LD 


DE,7500H 


j 800 HZ, 1/6 SEC 


LD 


A, (PORT) 


;PORT TARTALOM BYTE 


LD 


B,D 


; IDOZITES 


XOR 


10H 


;DUDA(-NOT(DUDA) 


OUT 


(3), A 





F-61 



00B3' 10 FE 




DJNZ 


S 


; VARAKOZAS 


00B5' ID 




DEC 


E 


;l/6 SEC LETELT? 


00B6' 20 F6 




JR 


NZ,VK071 


;=NEM, DUDALJ MEG! 


00B8' C9 




RET 






00B9' 10 44 




DJNZ 


VK09-2 


;=NEM 08 (BACK STEP) 


00BB» ED 5B 0006* 


VK08: 


LD 


DE,(DCB+6> 


;SOR/OSZLOP CIM 


OOBF' 01 060C 




LD 


BC060CH 


;B<-6, C<-12 


00C2' 7B 




LD 


A,E 


;OSZLOPCIM 


00C3' 18 05 




JR 


VK0B2 




00C5' 7A 


VK081: 


LD 


A,D 


fSORCIM 


00C6' 91 




SUB 


C 


;EGY SORRAL FEL 


00C7' D8 




RET 


C 


;=KEP ELEJEN ALL 


00C8' 57 




LD 


D,A 


;UJ SORCIM MENT 


00C9' AF 




XOR 


A 


;0SZLOPCIM<-256 


OOCA' CB 7E 


VK082: 


BIT 


7, <HL) 




OOCC 28 01 




JR 


Z,VK083 


;=NINCS ELONGACIO 


OOCE' 90 




SUB 


B 


; 0SZL0P<-0SZL0P-12 


OOCF' 90 


VK083: 


SUB 


B 


;0SZL0P<-0SZL0P-6 


OODO' BB 




CP 


E 


;BAL SZELEN TUL? 


O0D1' 5F 




LD 


E,A 


;UJ OSZLOPCIM 


O0D2' 30 Fl 




JR 


NCVK081 


;=IGEN, ELOZO SORBA 


00D4' ED 53 0006* 




LD 


(DCB+6),DE 


;SOR/OSZLOP CIM MENT 


00D8' FD 21 025E' 


VK084: 


LD 


IY,KARBST 


;BSTEP KAR.ROM CIM 


OODC 7E 


VK085: 


LD 


A,(HL) 


; FLAG-BYTE MENT 


OODD' F5 




PUSH 


AF 




OODE' 30 OE 




JR 


NCVK087 


;=PRE-CLEAR, ALAP RAJ! 


OOEO' F6 02 




OR 


2 


;FLAG<-INVERZ RAJZ 


00E2' CB 6F 




BIT 


5,A 




00E4' 28 02 




JR 


Z.VK086 


;=FEKETE HATTER 


00E6' EE 02 




XOR 


2 


; FLAG < -NORMAL RAJZ 


00E8' DD CB 03 56 


VK086: 


BIT 


2, (IX+3) 




OOEC 28 02 




JR 


Z,VK088 


;=KURZOR INAKTIV 


OOEE' EE 02 


VK087: 


XOR 


2 


; FLAG<-NOT( INV.RAJZ ) 


OOFO' 77 


VK088: 


LD 


(HL),A 


;FLAG<-UJ ERTEKEK 


00F1' CD 01D5' 




CALL KARGEN 


; BSTEP/UNDERLINE RAJZ 


00F4' Fl 




POP 


AF 




OOFS' 32 0005* 




LD 


(DCB+5),A 


jFLAG<-EREDETI ERTEK 


00F8' C9 




RET 








• H-TAB 


POZICIO TABLA <TERH 


. A DJNZ) 


00F9' 04 34 64 94 


TABTAB: 


DEFB 4,52,100, 


148,196,244 


OOFD' C4 F4 










OOFF' 10 25 




DJNZ VKOC-4 


;=NEM 09 (H-TAB) 


0101' 23 


VK09: 


INC 


HL 


; OSZLOPCIM CIME 


0102' 5E 




LD 


E,(HL) 


; OSZLOPCIM 


0103' DD 56 07 


VK091: 


LD 


D, (IX+7) 


; SORCIM 


0106' 06 OB 




LD 


B,ll 


;TORLENDO PONTSZAM 


0108' CD 0000* 


VK092: 


CALL CLRVK9 


jTORLES/BEALLITAS 


010B' 14 




INC 


D 


; SORCIM NOVELES 



F-62 



FOGBELfcK 



OlOC' 


3E 


BF 


OlOE' 


BA 




OlOF' 


38 


02 


0111" 


10 


F5 


01 13' 


1C 




0114' 


28 


34 


0116 


' 21 


00F8' 


0119' 


23 




01 1A 


' 7E 




01 IB 1 


' CB 57 


011D 


' 28 


E4 


011F' 


' BB 




0120 


' 20 


F7 


0122' 


' DD 


73 06 


0125 


' C9 




0126' 


r 05 




0127 


' 05 




0128 


' 10 


IE 


012A 


' CD 


01C4' 


012D 


' AF 




012E 


' 21 


0104 


0131 


t 22 


0006» 


0134 


' 6F 




0135 


' 5C 




0136 


' DD 


66 08 


0139 


' 54 




013A 


' 01 


17FF 


013D 


' DD CB 05 6E 


0141 


' 28 


01 


0143 


' 3D 




0144 


' 77 




0145 


' ED BO 


0147 


' C9 




0148 


' 10 


24 


014A 


' 21 


0006* 


014D 


' 36 


04 


01 4F 


' 23 




0150 


' 3E OC 


0152 


' 86 




0153 


' FE 


CO 


0155 


' 30 


02 


0157 


' 77 




0158 


' C9 




0159 


' AF 




015A 


» 23 




015B 


' 56 




015C 


' 5F 




015D 


' 62 




015E 


' 24 




015F 


' 2E 


80 



VK093: 



VK094: 



VKOC: 



VK0C1: 



VK0C2: 



VKOD: 



VK0D1: 



LD 

CP 

JR 

DJNZ 

INC 

JR 

LD 

INC 

LD 

BIT 

JR 

CP 

JR 

LD 

RET 

DEC 

DEC 

DJNZ 

CALL 

XOR 

LD 

LD 

LD 

LD 

LD 

LD 

LD 

BIT 

JR 

DEC 

LD 

LDIR 

RET 

DJNZ 

LD 

LD 

INC 

LD 

ADD 

CP 

JR 

LD 

RET 

XOR 

INC 

LD 

LD 

LD 

INC 

LD 



A, 191 

D 

CVK093 

VK092 

E 

Z f VKOD 

HL,TABTAB-1 

HL 

A, (HL) 

2,A 

Z,VK091 

E 

NZ,VK094 

<IX+6) f E 

B 

B 

VKOD-2 

VK16 

A 

HL,0104H 

(DCB+6),HL 

L,A 

E f H 

H, (IX+8) 

D,H 

BC,6143 

5, (IX+5) 

Z,VK0C2 

A 

<HL),A 

VK0E-2 

HLrDCB+6 

(HL),4 

HL 

A, 12 

A, (HL) 

192 

NCVK0D1 

(HL),A 

A 

HL 

D, (HL) 

E,A 

H,D 

H 

L f 128 



KEPERNYO ALJA? 
=I6£N, KOV.OSZLOP 
=VAN MEG PONT 
OSZLOPCIM NOVELES 
=JOBB SZEL, CR 
H-TAB POZ.TABLA 

KOV.TABLAELEM 
TERMINATOR? 
=IGEN, UJ OSZLOPOT 
H-TAB POZICIO? 
=NEM, KOVETKEZOT 
OSZLOPCIM MENT 

;0A, OB KOD NINCS 

;=NEM OC (CLEAR SCREEN) 

;PRE-CLEAR KI 

;A(-0 

;S0R(-1, 0SZLOP(-4 

L(-0 
E(-l 

(HL)=DRAM-START 
(DE)=DRAM-START+1 
DRAM MERET-1 
FEHER HATTER? 
=FEKETE, K0D(-0 
FEHER, KOD(-FFH 
DRAM FELTOLTESE A 
MEGFELELO KODDAL 

=NEM OD (CR & LF) 
OSZLOPCIM CIME 
0SZL0PCIM(-4 
SORCIM CIME 
1 BETUS0R=12 KEPSOR 
SORCIM(-KOV.SOR CIME 
KEP ALJAN TUL? 
=ISEN, ROLL 
UJ SORCIM MENT 

;A(-0^- D{splQ^ ^M 

; DRAM-START-H CIME 

;DRAM-START-H 

j(DE)=DRAM-START 

;H(-DRAM-START 

; H( -DRAM-START+256 

■ r ( HL ) =DRAM-START+384 
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FU66fcl_£K — 

0161' 01 1680 




0164' ED BO 




0166' 62 




0167' 6B 




0168' 1C 




0169' 01 017F 




016C' 18 CF 




016E' 10 04 




0170' 23 


VKOE: 


0171' 36 04 




0173' C9 




0174' 10 03 




0176' CB C6 


VKOF: 


0178' C9 




0179' 10 ID 




017B' 3E 04 


VK10: 


017D' CB 46 


VK101: 


017F' 2A 0006* 




0182' 20 OC 




0184' 84 




0185' 67 




0186' 05 




0187' 28 02 




0189' FE CO 




018B' DO 


VK102: 


01BC 22 0006» 


VK103: 


018F' C9 




0190' 85 


VK104i 


0191' 6F 


• 


0192' 05 




0193' 28 F6 




0195' D8 




0196' 18 F4 




0198' 10 05 




019A' 04 


VK11: 


019B' 3E FC 




019D' 18 DE 




019F' 10 03 




01A1' CB BE 


VK12: 


01A3' C9 




01A4' 10 08 




01A6' CB 6E 


VK13: 


01A8' C8 




01A9' CB AE 




01AB' C3 0073' 




01AE' 10 OD 




01B0' 7E 


VK14: 


01B1' E6 E7 




01B3' CB 57 




01B5' 28 02 





LD 

LDIR 

LD 

LD 

INC 

LD 

JR 

DJNZ 

INC 

LD 

RET 

DJNZ 

SET 

RET 

DJNZ 

LD 

BIT 

LD 

JR 

ADD 

LD 

DEC 

JR 

CP 

RET 

LD 

RET 

ADD 

LD 

DEC 

JR 

RET 

JR 

DJNZ 

INC 

LD 

JR 

DJNZ 

RES 

RET 

DJNZ 

BIT 

RET 

RES 

JP 

DJNZ 

LD 

AND 

BIT 

JR 



BC,5760 

H,D 

L,E 

E 

BC,383 

VK0C1 

VKOF-2 

HL 

(HL),4 

VK10-2 
0, (HL) 

VK11-2 

A, 4 

0, (HL) 

HL, (DCB+6) 

NZ,VK104 

A,H 

H,A 

B 

Z,VK102 

192 

IMC 

( DCB+6 >,HL 

A,L 

L f A 

B 

Z,VK102 

C 

VK103 

VK12-2 

B 

A, -4 

VK101 

VK13-2 

7, (HL) 

VK14-2 

5, (HL) 

Z 

5, (HL> 

VK031 

VK15-2 

A, (HL) 

0E7H 

2,A 

Z,VK141 



jELTOLANDO BYTE-SZAH 
;ROLL FEL 

; (HL)=TOLTENDO TER.CIM 
;(DE)=(HL)+1 
;FELTOLTENDO BYTE-SZAM 
;UTOLSO SOR FELTOLTESE 
;=NEM OE (ONLY CR) 
;OSZLOPCIH CIHE 
;0SZL0PCIM(-4 

j=NEM OF (FUGG. IRAS) 
; IRANY<-FUG60LEGES 

;=NEM 10 (ALSO INDEX) 
j 4 KEPSORRAL LE 

fSOR/OSZLOP CIM 
;=FUG60LEBES IRAS 
;SOR(-SOR (+-) 4 
;UJ SORCIH MENT 

;=11 (FELSO INDEX) 
jMAX. SORCIM 
;=KEPEN KIVULRE, NEH! 
;SOR/OSZLOP CIM MENT 

; OSZLOP ( -OSZLOP ( +- ) 4 
;UJ OSZLOPCIM MENT 

;=11 (FELSO INDEX) 

;=KEPEN KIVULRE, NEM! 

;SOR/OSZLOP CIM MENT 

;=NEM 11 (FELSO INDEX) 

;B(-1 

|4 KEPSORRAL FEL 

;=NEM 12 (ELONGACIO KI) 
;EL0N6ACI0 KI 



=NEM 13 (SOTET HATTER) 

FEKETE A HATTER? 

=MAR FEKETE 

HATTER FLAG (-FEKETE 

KEP KOMPLEMENTALASA 

=NEM 14 (NORMAL ALAP) 

FLA6-BYTE 

INV. ALAP(-PRE-CLEAR<-0 

PRE-CLEAR-PUF.=1? 

=NEM, PRE-CLEAR(-0 



F-64 



Hi 



FOGGELtK 



01B7' 


F6 08 


01B9 f 


77 


OIBA' 


C3 0083' 


OIBD' 


10 03 


OIBF' 


CB B6 


01C1' 


C9 


01C2' 


10 08 


01C4' 


CB 96 


01C6' 


CB 66 


01C8' 


CO 


01C9' 


CB 9E 


OICB' 


C9 


OICC' 


10 02 


OICE' 


CB 86 


OlDO' 


C9 



VK141: 



VK15: 



VK16: 



VK17: 



OR 


8 


LO 


(HL)fA 


JP 


VK033 


DJNZ 


VK16-2 


RES 


6,(HL) 


RET 




DJNZ 


VK17-2 


RES 


2,<HL) 


BIT 


4,<HL) 


RET 


NZ 


RES 


3,(HL) 


RET 




DJNZ 


VK17+2 


RES 


0, (HL) 


RET 





PRE-CLEAR<-1 
FLAB-BYTE MENT 

=NEM 15 (UNDERLINE KI) 
UNDERLINE KI 

=NEM 16 (PRE-CLEAR KI) 

PRE-CLEAR-FUF<-0 

INVERZ ALAP? 

=I6EN, PRE-CLEAR MARAD 

PRE-CLEAR KI 

=NEM 17 (VIZSZ. IRAS) 
IRANY<-VIZSZINTES 
18.. ID KOD NINCS 



01D1' FD 21 0257' UNDKAR: 



; UNDKAR - UNDERLINE KIRAJZOLASA 

m 

LD IY,KARUND ; UNDERLINE KAR. ROM 



KARBEN - KARAKTER KIRAJZOLO RUTIN 



01D5' 


ED 5B 0006* 


KARBEN: 


LD 


DE, (DCB+e 


01D9' 


DD CB 05 


46 




BIT 


0, (IX+5) 


01DD' 


20 38 






JR 


NZ,KGENY 


01DF» 


FD CB 00 


7E 


KBENX: 


BIT 


7, (IY+O) 


01E3' 


28 07 






JR 


Z,K6ENX2 


01E5' 


14 






INC 


D 


01E6' 


14 . 




K6ENX1: 


INC 


D 


01E7' 


3E BF 






LD 


A, 191 


01E9' 


BA 






CP 


D 


01EA' 


38 27 






JR 


CKGENX7 


01EC 


06 06 




K6ENX2: 


LD 


B,6 


01EE' 


DD 5E 06 






LD 


E, (IX+6) 


01F1' 


FD 7E 00 






LD 


A F (IY+0) 


01F4' 


17 






RLA 




01F5' 


87 




K6ENX3: 


ADD 


A, A 


01F6' 


DD CB 05 


7E 




BIT 


7, (IX+5) 


01 FA' 


28 06 






JR 


Z,KBENX4 


01FC 


DC 0000» 






CALL 


CSETD1 


01FF' 


1C 






INC 


E 


0200' 


28 09 






JR 


Z,KBENXG 


0202' 


DC 0000« 




KBENX4: 


CALL 


CSETD1 


0205' 


1C 






INC 


E 


0206' 


28 03 






JR 


Z>K6ENX6 


0208' 


10 EB 






DJNZ 


KBENX3 


020A' 


17 




K6ENX5: 


RLA 




020B' 


05 




KGENX6: 


DEC 


B 


020C 


F2 020A' 






JP 


P,K6ENX5 


020F' 


FD 23 






INC 


IY 



SOR/OSZLOP CIM 

=FUGG0LE6ES IRAS 
*VIZSZINTES IRAS* 
=NINCS SULLYESZTES 
2 SORRAL LE 
KOV. SORBA 
KEP ALJA 

=KEP ALJAN VAN, KESZ 
KAR. SZELESSEGE 
EREDETI OSZLOPCIM 
KOV. KAR. SOR 
SULLYESZTES-BIT KI 
CY<-KOV. PONT 

=NEM ELONGALT 

AKTIV PONT RAJZOLAS 

KOV. OSZLOPBA 

=KEP JOBB SZELE 

AKTIV PONT RAJZOLAS ^^C. 

KOV. OSZLOPBA 

=KEP JOBB SZELE 

=VAN MEG PONT 

CY<-TERMINATOR 

SOR ELNYELES? 

=IBEN, TOVABB 

KAR.KOV.SORARA 



F-65 



FOGBELfeK 



0211' 

0213' 

0216' 

0217' 

0218' 

0219' 

021B' 

021D' 

0220' 

0224' 

0226' 

0227 " 

0229' 

022A' 

022C 

022E' 

0231' 

0234' 

0235' 

0236' 

023A' 

023C 

023F' 

0240' 

0242' 

0245' 

0246' 

0248' 

024A' 

024B' 

024C 

024F' 

0251' 

0253' 

0256' 



30 D3 

DD 56 07 

C9 

14 

15 

20 05 



16 BF 

DD 72 07 

FD CB 00 7E 

28 06 

1C 

28 2A 

1C 

28 27 

06 06 

DD 56 07 

FD 7E 00 

17 

87 

DD CB 05 7E 

28 06 

DC 0000* 

15 

28 09 
DC 0000« 

15 

28 03 

10 EB 

17 

05 

F2 024A' 

FD 23 

30 D6 

DD 5E 06 

C9 



KBENX7: 
KGENY: 

KGENYO: 

KGENY 1: 
KGENY2: 

K6ENY3: 



KGENY4: 



KGENY5: 
KGENY6: 



KGENY7: 



JR NCtKGENXl 

LD D, <IX+7) 

RET 

INC D 

DEC D 

JR NZ, KGENYO 

LD D,191 

LD <IX+7),D 

BIT 7,(IY+0) 

JR Z f KGENY2 

INC E 

JR Z,KGENY7 

INC E 

JR Z,KGENY7 

LD B,6 

LD D,(IX*-7) 

LD A,(IY+0) 

RLA 

ADD A f A 

BIT 7,(IX+5) 

JR Z,K6ENY4 

CALL CSETD1 

DEC D 

JR Z,KSENY6 

CALL CSETD1 

DEC D 

JR Z,KGENY6 

DJNZ K6ENY3 

RLA 

DEC B 

JP P,KGENY5 

INC IY 

JR NCKGENY1 

LD E, (IX+6) 

RET 



;=VAN MEG KAR.SOR 
; EREDETI SORCIM 

; *FUGGOLEGES IRAS* 
;SOR VEGEN ALL? 
;=NINCS A SOR VE6EN 
;S0R<-191, SOR ELEJERE 



=NINCS SULLYESZTES 
2 OSZLOPPAL JOBBRA 
=KEP JOBB SZELE, KESZ 
KOV. OSZLOPBA 
=KEP JOBB SZELE, KESZ 
KAR. SZELESSEGE 
EREDETI SORCIM 
KOV. KAR. SOR 
SULLYESZTES-BIT KI 
CY<-KOV. PONT 

=NEM EL0N6ALT 
AKTIV PONT RAJZOLAS 
ELOZO SORBA 
=KEP TETEJE 
AKTIV PONT RAJZOLAS 
ELOZO SORBA 
=KEP TETEJE 
=VAN MEG PONT 
CY< -TERMINATOR 
SOR ELNYELES? 
=IGEN, TOVABB 
KAR.KOV.SORARA 
=VAN MEG KAR.SOR 
EREDETI OSZLOPCIM 



UNDERLINE A BACK-STEP KAR. ROM 



0257' 80 80 80 80 KARUND: 

025B' 80 80 FF 

025E' 7E FE FE FE KARBST: 

0262' FE FE 

0264' FE FE FE FE 

0268' FF 



DEFB 80H f 80H,80H,80H,80H,80H,0FFH 
DEFB 7EH,0FEH,0FEH,0FEH,0FEH,0FEH 
DEFB 0FEH,0FEH,0FEH,0FEH,0FFH 



CUROFF, CURNEG - KURZOR RAJZOLO RUTINOK 



0269' DD CB 03 56 
026D' C8 
026E' 3A 0003* 



CUROFF: 
CURNEG: 



BIT 2,(IX+3) 

RET Z 

LD A,(DCB+3) 



;=KURZOR INAKTIV 

; KURZOR BIT INVERTALAS 



F-66 



FOGGELfeK 



0271' 


EE 04 


0273' 


32 0003« 


0276' 


FD 21 0257' 


027A' 


21 0005« 


027D' 


37 


027E' 


C3 OODC 



XOR 

LD 

LD 

LD 

SCF 

JP 



(DCB+3),A 
IY,KARUND 
HL,DCB+5 

VK085 



;KURZOR=UNDERLINE 
;DSP FLAG-BYTE CIM 
|(CY)=KURZOR RAJZOLAS 
;RAJZOLAS + RET 



F-67 



FOGGELtK 



KYBHND - BILLENTYOZET HANDLER Vs'84.1 



0000' 


E5 


0001' 


DS 


0002' 


CS 


0003' 


AF 


0004* 


5F 


0005' 


47 


0006' 


DO 86 02 


0009' 


F2 OOOE' 


000C' 


CB FB 


000E' 


CB 77 


0010' 


20 OF 


0012' 


E6 3F 



EXT DCB,HANG,CUR0FF,CURNE6 
ENTRY KYBHND, KKBHND, BREAK, 60MBQ 



KEYBOARD HANDLER 

MEGVIZSGALJA, HOGY A BILLENTYUZETEN NYOMJAK-E 
VALAMELYIK BILLENTYUT, ES HA TALAL AKTIV GOM- 
BOT, ANNAK KODJAT AZ A REGISZTERBEN ADJA MEG. 
VALAMELY GOMB SOKSZOROS LEKERDEZESET CSAK AB- 
BAN AZ ESETBEN KEZDI MEG, HA AZ ADOTT GOMB A 
GYORS SCANNELES ALATT AKTIVNAK BIZONYULT. EK- 
KOR 128-SZOR MEGVIZSGALJA, MAJD AKKOR TEKINTI 
AKTIVNAK, HA A SOKSZOROS LEKERDEZES ALATT LE- 
GALABB EGYSZER AKTIV VOLT. A VEZERLO GOMBOKAT 
- SHIFT, CNT, UPPER - MINDEN ESETBEN SOKSZO- 
ROS LEKERDEZESSEL VIZSGALJA. HA A DCB-BEN TA- 
ROLT KEYBOARD-FLAG-BYTE 1-ES BITJE = 1, BREAK 
KODOT NEM KULD. HA A O-AS BIT = 1, SPECIALIS 
UZEMMODBAN MUKODIK A HANDLER. EKKOR A LENYIL 
BILLENTYU VEZERLO GOMBKENT - EXTRA SHIFT - U- 
ZEMEL. A LENYILLAL EGYUTT AKTIV GOMB KODJA AZ 
EREDETI KODNAL 80H-VAL NAGYOBB LESZ. 
A DCB+4 BYTE TAROLJA A SOKSZOROS LEKERDEZESEK 
SORAN KET VIZSGALAT KOZOTTI IDOZITES IDOTAR- 
TAMAT. EZ ALAPERTELMEZESBEN 160 MIKROSEC (24) 
EZT AZ ERTEKET PROGRAMBOL MEGVALTOZTATVA LAS- 
SITANI, ILL. GYORSITANI LEHET A KLAVIATURAT. 
AZ IDOZITO MIN ERTEKE = 10, MAX ERTEKE = 255. 



REGISZTEREK: 



BE: 
KI: 



STKs 



IMINCS 

(BC),<DE),(HL)= * 
(A)= ASCII KOD 
(F)= (A) SZERINT 
10 BYTE 



KYBHND: 



PUSH HL 
PUSH DE 
PUSH BC 
XOR 



KLAV1: 



LD 

LD 

ADD 

JP 

SET 

BIT 

JR 

AND 



A 

E,A 

B,A 

A, (IX+2) 

P,KLAV1 

7,E 

6, A 

NZ,KLAV2 

3FH 



;REGISZTER MENTES 



fFELTETELEZETT UPPER=0 
;INIT KLAV10 SZAMARA 
; AKTIV GOMB CIME 
;=UPPER = 
;UPPER<-1 

;=NEM VOLT AKTIV GOMB 
; AKTIV GOMB CIME 



F-68 



FQG6EL4K 



0014' 


FE OF 




0016' 


28 09 




0018' 


4F 




0019' 


CD OOBB' 




001C 


3A 0000» 




001F' 


38 56 




0021' 


OE 40 


KLAV2: 


0023' 


OD 


KLAV3: 


0024' 


FA 00A6' 




0027' 


79 




0028' 


FE 03 




002A' 


28 F7 




002C 


FE 07 




002E' 


28 F3 




0030' 


FE OF 




0032' 


20 06 




0034' 


DD CB 03 46 




0038' 


20 E9 




003A' 


CD 00B7' 


KLAV4: 


003D' 


30 E4 




003F' 


79 




0040' 


FE 05 




0042' 


28 53 




0044' 


B3 




0045' 


32 0002» 




0048' 


CB 39 


KLAV5: 


004A' 


30 OF 




004C 


CB 21 




004E' 


21 0125' 




0051' 


09 




0052' 


OE 03 




0054' 


CD OOBB' 




0057' 


ED 4A 




0059' 


18 1A 




005B' 


21 0108' 


KLAV6: 


005E' 


09 




005F' 


OE 07 




0061' 


CD OOBB' 




0064' 


38 OF 




0066' 


CB F3 




0068' 


CB 7B 




006A' 


20 09 




006C 


OE 03 




006E' 


CD OOBB' 




0071' 


38 02 




0073' 


CB EB 




0075' 


7E 


KLAV7: 


0076' 


B3 




0077' 


E6 7F 


KLAV71 


0079' 


DD CB 03 46 





CP 

JR 

LD 

CALL 

LD 

JR 

LD 

DEC 

JP 

LD 

CP 

JR 

CP 

JR 

CP 

JR 

BIT 

JR 

CALL 

JR 

LD 

CP 

JR 

OR 

LD 

SRL 

JR 

SLA 

LD 

ADD 

LD 

CALL 

ADC 

JR 

LD 

ADD 

LD 

CALL 

JR 

SET 

BIT 

JR 

LD 

CALL 

JR 

SET 

LD 

OR 

AND 

BIT 



OFH 

Z,KLAV2 

C,A 

GOMBM 

A, (DCB+O) 

CKLAV71 

C,40H 

C 

M,KLAV10 

A,C 

3 

Z,KLAV3 

7 

Z,KLAV3 

OFH 

NZ,KLAV4 

0, (IX+3) 

NZ,KLAV3 

GOMBQ 

NCKLAV3 

A,C 

5 

Z,KLAV9 

E 

(DCB+2),A 

C 

NC f KLAV6 

C 

HL,KLAVT2 

HLfBC 

C,3 

GOMBM 

HL f BC 

KLAV7 

HL,KLAVT1 

HLfBC 

C,7 

GOMBM 

CKLAV7 

6,E 

7,E 

NZ,KLAV7 

C,3 

GOMBM 

CKLAV7 

5,E 

A, (HL) 

E 

7FH 

0, (IX+3) 



LENYIL VOLT AKTIV? 
=IGEN, NEM AKTIV! 
GOMBCIM A HELYERE 
MOST IS AKTIV? 
AKTIV ASCII KODJA 
=IGEN, KOD KESZ! 
UTOLSO GOMBCIM + 1 

;=NINCS AKTIV GOMB 
;KOVETKEZO GOMBCIM 

;=SHIFT, NE NEZD! 

;=CTRL f NE NEZD! 

;=NEM A LENYIL 



=SPEC. MOD, NE NEZD! 
AKTIV EZ? 
=NEM, A KOVETKEZOT 
AKTIV GOMB CIME 



=UPPER AZ AKTIV 
A7<-UPPER BIT 
UPPER A AKTIV CIM MENT 
GOMB CIM/2 
=BETU (PAROS), (B)=0 
CIM VISSZAALLITAS 
-3.NEM-BETU KODTABLA-3 
NEM-SHIFTES CIME-3 



;CY<-1» HA SHIFT AKTIV 
;(HL)=A KOD CIME 

;BETU KODTABLA 
;(HL)=ALAPKOD CIME 

CTRL AKTIV? 

=IGEN, KOD<-ALAPKOD 

K0D<-ALAPK0D+40H 

UPPER? 

=IGEN, K0D<-K0D+40H 



SHIFT AKTIV? 
=IGEN, K0D<-K0D+40H 
K0D<-ALAPK0D+60H 
AZ ALAPKOD 
MODOSITOTT KOD 
AZ ASCII KOD 



F-69 



007D" 


- rue 
28 


09 




JR 


Z.KLAV8 


;=NEM SPEC. MOD 


007F 


' 17 






RLA 




;RRA MI ATT 


0080' 


67 






LD 


H,A 


;KOD MENTES 


0081 


' OE 


OF 




LD 


CfOFH 




0083' 


CD 


OOBB' 




CALL 


GOMBM 


;CY<-l f HA LENYIL AKTIV 


0086 


' 7C 






LD 


A,H 


;KOD VISSZAMENTES 


0087' 


IF 






RRA 




;K0D<-K0D+80H, HA AKTIV 


0088 


' 32 


0000» 


KLAV8: 


LD 


(DCB+0),A 


jBILLENTYU KOD MENTESE 


008B' 


' FE 


01 




CP 


1 




008D 


' 20 


77 




JR 


NZ,KKLAV5 


;=NEM BREAK, RET 


OOBF 1 


DD 


CB 03 4E 




BIT 


l,(IX+3) 




0093 


' 28 


71 




JR 


Z,KKLAV5 


;=NINCS BREAK TILTAS 


0095' 


18 


OF 




JR 


KLAV10 


;KOD<-0, RET 


0097 


' 63 




KLAV9: 


LD 


H,E 


; UPPER MENT 


0098 


' 11 


F028 




LD 


DE,0F028H 


;400 HZ, 1/10 SEC 


009B 


' CD 


0000* 




CALL 


HANG 


;BILLENTYU tWNB 


009E' 


5C 






LD 


E,H 




009F 


' CD 


OOBB' 




CALL 


BOMBM 


j UPPER GOHB AKTIV? 


00A2' 


' 38 


FB 




JR 


CfI-3 


;=IGEN, VARJ MEG! 


00A4 


' 06 


80 




LD 


B,80H 


; UPPER < -NOT (UPPER) 


00A6 1 


' 78 




KLAV10: 


LD 


A,B 


;A<-0, VAGY 80H 


00A7 


' AB 






XOR 


E 


;A7( -UPPER BIT 


00A8 


' F6 


40 




OR 


40H 


;NINCS AKTIV JELZESE 


OOAA 


' 32 


0002» 




LD 


(DCB+2),A 


; UPPER 4 AKTIV CIM MENT 


OOAD 


' AF 






XOR 


A 




OOAE 


' 18 


D8 




JR 


KLAV8 


;KOD<-0, RET 



BREAK - BREAK GOMB VIZSGALATA 

MEGVIZS6ALJA, HOGY A BREAK GOMB AKTIV-E. HA 
BREAK TILTAS VAN, VIZSGALAT NELKUL INAKTIV 
ALLAPOTTAL TER VISSZA. 

REGISZTEREK: 







; BE: 


NINCS 






; Ki; 


<E),(HL)= » 

(A),(B),(D)= ? 

(C)=3FH 

(CY)= 1, AKTIV A BREAK 






; STK: 


2 BYTE 


OOBO' 


DD CB 03 4E 


BREAK: 


BIT l,(IX+3) ; BREAK TILTAS? 


00B4' 


CO 




RET NZ ;=IGEN, BREAK INAKTIV 


O0B5' 


OE 3F 




LD C,3FH ;3FH=BREAK 






; GOMBQ - 


GOMB GYORS LEKERDEZESE 


00B7' 


ED 78 


GOMBQ: 


IN A,(C) ;GOMB LEKERDEZES 


00B9' 


IF 




RRA ;CY<-ERTEK 


OOBA' 


DO 




RET NC ;=INAKTIV 



F-70 



FOGGELfeK 



OOCF 
OODO 
OOOl 
00D2 
O0D4 
00D7 
00D8 
OODB 
OODC 
OODE 
OODF 
OOEO 
00E1 
00E3 
00E6 
00E8 
00E9 
OOEB 
OOEE 



00 



E5 

D5 

C5 

FD E5 

DD 56 

D5 

CD 0000» 

01 

IE 3C 

3E 

57 

ID 

28 F4 

CD 0000* 

28 F7 

92 

20 08 

DD 35 01 

20 FO 







; GOMBM - 


- GOMB S0K8Z0R0S 


LEKERDEZESE 


OOBB' 


16 7F 


GOMBM: 


LD 


D,127 




; 127=128-1, SZLO 


OOBD' 


06 80 




LD 


B,128 




;LEKERDEZESEK SZAMA 


OOBF' 


3A 0004« 


G0MB1: 


LD 


A, (DCB+4) 


;HIN 60 MIKROSEC DEU 


00C2' 


3D 




DEC 


A 






00C3' 


20 FD 




JR 


NZ,t-l 




;=VARJ MEG! 


00C5' 


ED 78 




IN 


A, (C) 




;GOMB LEKERDEZES 


00C7' 


E6 01 




AND 


1 




?AO<-ERTEK 


OOCS' 


82 




ADD 


A,D 




;SZLO<-SZLO+ERTEK 


OOCA' 


57 




LD 


D,A 






OOCB' 


10 F2 




DJNZ 


G0MB1 




;=TOVABBI LEKERDEZES 


OOCD' 


17 




RLA 






;CY<-1, HA SZL0>128 


OOCE' 


C9 




RET 






;<CY)=1, HA AKTIV 



KIVARASOS KLAVIATURA HANDLER 

MUKODESE SORAN A KLAVIATURAT ADDIG SCANNELI, 
AMIG AZON AKTIV BILLENTYUT IMEM TALAL. EZ IDO 
ALATT A KURZOR VILLOG. FOLYAHATOS NYOMAS HA- 
TASARA - EGY IDOZITES LETELTE UTAN - AUTOMA- 
TIKUS ISMETLO FUNKCIO INDUL MEG. 



REGISZTEREK: 



BE: 
KI: 



STK: 



NINCS 

(BC),(DE) f (HL)= * 
(A)= ASCII KOD 
(F)= <A) SZERINT 
24 BYTE 



KKBHND: 



KKLAV1 : 



KKLAV2: 
KKLAV3: 



PUSH 

PUSH 

PUSH 

PUSH 

LD 

PUSH 

CALL 

POP 

LD 

DEFB 

LD 

DEC 

JR 

CALL 

JR 

SUB 

JR 

DEC 

JR 



HL 

DE 

BC 

IY 

D, (IX+O) 

DE 

CURNEG 

DE 

E,KLAVK1 

3EH 

D,A 

E 

ZrKKLAVl 

KYBHND 

Z,KKLAV2 

D 

NZ,KKLAV4 

(IX+1) 

NZ f KKLAV3 



;REGISZTER MENTES 



;ELOZO KOD 
fELOZO MENTES 
; KURZOR NEGALAS 

VILLOGAS IDO 
LD A,- 
AKT.KOD=NULL 
VILLOGTATAS? 
=IGEN, NEGALAS 
KLAV. SCANNELES 
=KLAV. URES! 
=ELOZOVEL AZONOS? 
=NEM AZ ELOZO 
ISMETLES LEJART? 
=NEM, UJRA 



F-71 



OOFO' 


3E 


UHLEK. — 
01 




LD 


A,KLAVK2 ; 


ROVID 


IDOZITES 


OOF2' 


21 






DEFB 


21H ; 


LD 


HL, 


— 


0OF3' 


3E 


OF 


KKLAV4: 


LD 


A,KLAVK3 ; 


HOSSZU IDOZITES 


OOFS' 


32 


0001 » 




LD 


(DCB+DrA j 


IDOZITES IN IT 


00F8' 


CD 0000* 




CALL 


CUROFF j 


KURZOR KIKAPCS. 


OOFB' 


11 


F028 




LD 


DE,0F028H j 


400 H2 


:, 1/10 sec 


OOFE' 


CD 


0000* 




CALL 


HANG ; 


BILL. HANG 


0101' 


3A 


0000* 




LD 


A,(DCB+0) ; 


A KOD 




0104' 


FD 


El 




POP 


1Y 








0106' 


18 


22 


KKLAV5: 


JR 


KLAV11 ; 


REG. VISSZA, RET 


003C 






KLAVK1 


EQU 


60 ; 


VILLOGAS SZLO. 


0001 






KLAVK2 


EQU 


1 ; 


•ROVID 


IDOZITES 


OOOF 






KLAVK3 


EQU 


15 i 


HOSSZU IDOZITES _ 








F 








$— cxme iMe*] 


0108' 


19 




KLAVT1 : 


DEFB 


019H j 


,00 


00 


Y 


0109' 


13 






DEFB 


013H ; 


01 


02 


S 


010A' 


05 






DEFB 


005H ; 


|02 


04 


E 


010B 1 


17 






DEFB 


017H , 


;03 


06 


W 


010C 


04 






DEFB 


004H j 


;04 


08 


D 


010D 1 


' 18 






DEFB 


018H 


j05 


OA 


X 


010E' 


11 






DEFB 


011H ; 


;06 


OC 


Q 


010F' 


' 01 






DEFB 


001H , 


;07 


OE 


A 


0110' 


03 






DEFB 


003H 


;08 


10 


C 


0111 


r 06 






DEFB 


006H 


;09 


12 


F 


0112' 


12 






DEFB 


012H 


;0A 


14 


R 


0113 


' 14 






DEFB 


014H 


;0B 


16 


T 


0114' 


08 






DEFB 


008H 


;0C 


18 


H 


0115 


' 02 






DEFB 


002H 


;0D 


1A 


B 


0116' 


07 






DEFB 


007H 


(OE 


1C 


G 


0117 


16 






DEFB 


016H 


?0F 


IE 


V 


0118' 


OE 






DEFB 


OOEH 


; 10 


20 


N 


0119 


1 1A 






DEFB 


01AH 


ill 


22 


Z 


01 1A' 


15 






DEFB 


015H 


;12 


24 


U 


011B 


' OA 






DEFB 


OOAH 


;13 


26 


J 


one 


oc 






DEFB 


OOCH 


;14 


28 


L 


011D 


' OB 






DEFB 


OOBH 


;15 


2A 


K 


011E' 


OD 






DEFB 


OODH 


;16 


2C 


M 


011F 


' 09 






DEFB 


009H 


|17 


2E 


I 


0120' 


IE 






DEFB 


01EH 


;18 


30 


UE 


0121 


' 10 






DEFB 


010H 


;19 


32 


P 


0122' 


' OF 






DEFB 


OOFH 


;1A 


34 





0123 


' 00 






DEFB 





;1B 


36 


NINCS 


0124' 


00 






DEFB 





;1C 


38 


NINCS 


0125 


' 00 






DEFB 


OOOH 


;1D 


3A 


EE 


0126" 


' ID 






DEFB 


01DH 


;ie 


3C 


AE 


0127 


' 1C 






DEFB 


01CH 


f IF 


3E 


OE 


0128 


' IF 




KLAVT2: 


DEFB 


01FH 








0129 


' IF 






DEFB 


01FH 


;00 


01 


FNYIL 



F-72 



FOGGELtK 



012A' 


B7 


012B' 


CI 


012C 


Dl 


012D' 


El 


012E' 


C9 


012F' 


00 


0130' 


33 


0131' 


23 


0132' 


32 


0133' 


22 


0134' 


31 


0135' 


21 


0136' 


OA 


0137' 


1A 


0138' 


00 


0139' 


00 


013A' 


00 


013B' 


00 


013C 


00 


013D' 


00 


013E' 


37 


013F' 


2F 


0140' 


20 


0141' 


20 


0142' 


36 


0143' 


26 


0144' 


35 


0145' 


25 


0146' 


34 


0147' 


24 


0148' 


38 


0149' 


28 


014A' 


2B 


014B' 


3F 


014C 


30 


014D' 


3D 


014E' 


3E 


014F' 


3C 


0150' 


2D 


0151' 


IE 


0152' 


2E 


0153' 


3A 


0154' 


39 


0155' 


29 


0156' 


2C 


0157' 


3B 



; KLAV11 - KYBHND, 


KKBh 


KLAV11: OR 


A 


POP 


BC 


POP 


DE 


POP 


HL 


RET 




DEFB 





DEFB 


033H 


DEFB 


023H 


DEFB 


032H 


DEFB 


022H 


DEFB 


031H 


DEFB 


021H 


DEFB 


OOAH 


DEFB 


01AH 


DEFB 





DEFB 





DEFB 





DEFB 





DEFB 





DEFB 





DEFB 


037H 


DEFB 


02FH 


DEFB 


020H 


DEFB 


020H 


DEFB 


036H 


DEFB 


026H 


DEFB 


035H 


DEFB 


025H 


DEFB 


034H 


DEFB 


024H 


DEFB 


038H 


DEFB 


028H 


DEFB 


02BH 


DEFB 


03FH 


DEFB 


030H 


DEFB 


03DH 


DEFB 


03EH 


DEFB 


03CH 


DEFB 


02DH 


DEFB 


01EH 


DEFB 


02EH 


DEFB 


03AH 


DEFB 


039H 


DEFB 


029H 


DEFB 


02CH 


DEFB 


03BH 



;FLA6-EK A KOD SZERINT 
;REG. VISSZAMENTES 



;RET KYBHND, KKBHND 


;NINCS 






3 


;04 09 


* 




2 


;05 OB 


■I 




1 


;06 OD 


■ 


; 07 OF 


LNYIL 


;08 11 


NINCS 


;09 13 


NINCS 


;0A 15 


NINCS 




7 


;0B 17 


/ 


;0C 19 


SPACE 




6 


;0D IB 


* 




5 


;0E ID 


X 




4 


; OF IF 


S 




8 


;10 21 


( 




+ 


;11 23 


? 







;12 25 


= 




> 


;13 27 


< 


;14 29 


HOSSZU KIS I 


■15 2B 






9 


:16 2D 


) 



17 2F ; 



F-73 





FOGGELtK 


0158' 


2A 


0159' 


27 


015A' 


5F 


01 5B' 


7F 


015C' 


OC 


015D' 


OC 


015E' 


OD 


015F' 


OD 


0160' 


08 


0161' 


18 


0162' 


5B 


0163' 


7B 


0164' 


19 


0165' 


09 


0166' 


01 


0167' 


01 



DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 



02AH 
027H 
05FH 
07FH 
OOCH 
OOCH 
OODH 
OODH 
008H 
018H 
05BH 
07BH 
019H 
009H 
001H 
001H 



;18 31 ' 

; HOSSZU KIS U 

;19 33 HOSSZU KIS UE 

;1A 35 CLS 

;1B 37 CR 

;1C 39 BNYIL 

; HOSSZU KIS 

;1D 3B HOSSZU KIS OE 

;1E 3D JNYIL 

;1F 3F BREAK 



F-74 



FOGGELtK 



PRTHND - PRINTER HANDLER V:'84.1 



EXT DCB,DISP 
ENTRY PRTHND 



PRINTER HANDLER 



0000' 


B7 




0001' 


C8 




0002' 


C5 




0003' 


F5 




0004' 


DD 


CB 03 5E 


0008' 


20 


OC 


000A» 


FE 


IE 


OOOC 


20 


02 


OOOE' 


3E 


69 


0010' 


FE 


IF 


0012' 


20 


02 


0014' 


3E 


5E 


0016' 


4F 




0017' 


FE 


20 


0019' 


38 


OD 


001B' 


CD 


0064' 


001E' 


DD 


34 12 


0021' 


DD 


35 10 


0024' 


20 


36 


0026' 


3E 


OD 


0028' 


FE 


OC 


002A' 


28 


OD 



AZ A REGISZTERBEN KAPOTT KARAKTERT A PRIN- 
TERRE LISTAZZA, MAJD MEGVIZSGALJA, HOGY A 
SOR HOSSZA ELERTE-E A DCB-BEN TAROLT MAXI- 
MALIS SORHOSSZAT. HA NEM, RETURN. HA IGEN, 
A PRINTERRE EBY CR KODOT IR, MAJD MEGVIZS- 
GALJA, HOGY BETELT-E A LAP. HA BETELT, AK- 
KOR A PRINTERRE EGY FF KODOT IR, HACSAK A 
DCB-BEN TAROLT LAPMERET NEM NAGYOBB, MINT 
127. HA NAGYOBB, AKKOR A FORM FEED VEZERLO 
KOD SOSE KERUL KIIRASRA. 

VALAMELY NEM VEZERLOKOD KARAKTER KINYOMTA- 
TASA UTAN A PRINTER KURZOR ERTEKE 1-EL NO. 
AMENNYIBEN NEM TILTJUK, A HANDLER KET KO- 
DOT ATKONVERTAL (1EH->69H, 1FH->5EH). 



REGISZTEREK: 



BE: 
KI: 

STK: 



PRTHND: 



<A)= ASCII KOD 
<A),(BC),(DE),(HL)= * 
(F)= (A) SZERINT 
8 BYTE 



PRTK1: 



PRTNK: 



PRTVK: 



OR 

RET 

PUSH 

PUSH 

BIT 

JR 

CP 

JR 

LD 

CP 

JR 

LD 

LD 

CP 

JR 

CALL 

INC 

DEC 

JR 

LD 

CP 

JR 



A 

Z 

BC 

AF 

3, (IX+3) 

NZ, PRTNK 

1EH 

NZ,PRTK1 

A,69H 

1FH 

NZ, PRTNK 

A,5EH 

C,A 

C, PRTVK 

PRTOUT 

(IX+18) 

(IX+16) 

NZ,PRT2 

A,ODH 

OCH 

Z,PRTFF 



* =BLANK 

■REGISZTER MENTES 
;KAR.+FLAG MENT 

j=KONVERZIO TILOS 

;=NEM HOSSZU KIS I 
;A<-ROVID KIS I 



=NEM FNYIL 
A<-ASCII FNYIL 
KAR. MENTES 

=VEZERLO KOD "~ 
KARAKTER PRINT 
PRINTER KURZOR ELORE 
KAR.SZLO CSOKKENT 
=NEM SORVEG 
A<-CR 



O 



;=FORM FEED 



F-75 



FOBBELtfC 



002C 
002E 
0030 
0032 
0034 
0037 
0039 
003C 
003D 
0040 
0043 
0045 
0048 
004A 
004D 
004F 
0052 
0055 
0059 
005C 
005D 
005E 
005F 
0061 



FE OD 

28 04 

FE OA 

20 25 

DD 35 11 

20 14 

3A OOOF* 

B7 

FA 004D» 

32 001 1» 

OE OC 

CD 0064' 

OE OD 

CD 0064' 

OE OD 

3A OOOE* 

32 0010* 

DD 36 12 00 

CD 0064' 

Fl 

CI 

C9 

3E 07 

CD 0000* 



PRTCR: 
PRTFF: 



PRTCRls 



PRT1: 
PRT2: 



PROUTls 



CP 

JR 

CP 

JR 

DEC 

JR 

LD 

OR 

JP 

LD 

LD 

CALL 

LD 

CALL 

LD 

LD 

LD 

LD 

CALL 

POP 

POP 

RET 

LD 

CALL 



ODH 

Z, PRTCR 

OAH 

NZ,PRT1 

(IX+17) 

NZ,PRTCR1 

A, (DCB+15) 

A 

M,PRTCR1 

(DCB+17),A 

COCH 

PRTOUT 

CfODH 

PRTOUT 

CrODH 

A, (DCB+14) 

<DCB+16),A 

(IX+18),0 

PRTOUT 

AF 

BC 

A,7 
DISP 



;=CARRIGE RET 

;=NEM LINE FEED 
jSORSZLO CSOKKENT 
;=NEM LAPVEG 
;LAPHOSSZ 

;=255, FORM FEED NE! 
;SORSZLO<-LAPHOSSZ 

;FORM FEED KI 

;KET URES SOR! 

;A<-CR 

; KAR. SZLO< -SORHOSSZ 

; PRINTER KURZOR INIT 
;KARAKTER PRINT 
;KAR. + FLAG 
;REG. VISSZAMENTES 

;HANGJELZES 



0064' 


DB 05 


0066' 


CB 67 


0068' 


20 F5 


006A' 


E6 08 


006C' 


20 F6 


006E' 


79 


006F' 


D3 40 


0071' 


C9 



PRTOUT - EGY KARAKTER A PRINTERRE 
PRTOUT: IN A, (5) jSTATUSZ BE 



IN 

BIT 

JR 

AND 

JR 

LD 

OUT 

RET 



A, (5) 

4,A 

NZ,PR0UT1 

8 

NZ, PRTOUT 

A,C 

(100Q),A 



=OFF LINE 
=BUSY, ME6INT 
KAR. A PRINTERRE 



F-76 



FOGGELfcK 



GLINE - EBY SORT BEOLVASO RUTIN V:'84.1 



OOOO' 


C5 




0001' 


AF 




0002' 


06 




0003' 


El 




0004' 


E5 




0005' 


06 


D2 



EXT DISP,KKYB,EXIT1 
ENTRY GLINE 



6LINE - EGY SOR A KEYBOARD BUFFERBE 

BEOLVAS A KEYBOARDROL ES MEGJELENIT A DISPLAY 
AKTUALIS SORATOL KEZDODOEN EGY MAX. 210 DARAB 
KARAKTERBOL ALLO SORT. A KARAKTEREKET BEIRJA 
A (HL) ALTAL KIJELOLT KEYBOARD PUFFERBE. 
A CR, BREAK, H-TAB, SHIFT/ <-, CLS ES BACKSTEP 
VEZERLO KODOKTOL KULONBOZO 1EH-NAL KISEBB KO- 
DOKAT CSAK ECHO-ZZA, DE AZOKRA NEM REAGAL, ES 
- A TOBBI VEZERLO KODHOZ HASONLOAN - NEM IRJA 
BE EZEKET A KEYBOARD PUFFERBE. HA MAR 210 KA- 
RAKTERT ELTAROLT, AZ ESETLEGES TOVABBI KARAK- 
TEREK BEERKEZESEKOR HANGJELZEST AD, DE A KA- 
RAKTERT MAR NEM TAROLJA ES NEM ECHO-ZZA. 
CR ES BREAK KOD HATASARA A PUFFER VEGERE EGY 
O-AT IR, MAJD A VEZERLEST VISSZAADJA AZ AKTI- 
VIZALO RUTINNAK. A H-TAB KODOT ECHOZAS NELKUL 
ELNYELI. BSTEP HATASARA A PUFFER JELENLEGI U- 
TOLSO KARAKTERET TORLI, MIG SHIFT/<- HATASARA 
A TELJES SORT TORLI. UGYANEZT TESZI A CLS HA- 
TASARA IS. 

A RUTIN A KLAVIATURAT SPECIALIS MODBAN HIVJA. 
HA 80H-NAL NAGYOBB KOD ERKEZIK, A VEZERLEST A 
A RUTIN AZ EXIT1 PONTRA ADJA, A KOVETKEZO RE- 
GISZTER TARTALMAKKAL: 
HL - PUFFER POINTER 
B - SOR AKTUALIS HOSSZA 
C - SOR LEHETSEGES HOSSZA 
A - KARAKTERKOD O80H) 
AZ EXIT1 PONTON - HA SZUKSEGES - A DE REGISZ- 
TERPART MENTENI KELL! 



REGISZTEREK: 

BE: 

KI: 



STK: 



GLINE: 



GL1: 



(HL)= PUFFER CIM - 1 

(BC),(DE),(HL)= * 

(A)= ODH 

(CY)= l v BREAK-ET NYOMTAK 

30 BYTE 



PUSH BC 
XOR A 
DEFB 06H 
POP HL 
PUSH HL 
LD B,210 



jREGISZTER MENTES 
j NULL (GL3 MI ATT) 
;LD B,- 

; PUFFER KEZDOCIM 
;KEZDOCIM MENT 
;A SOR MAX HOSSZA 



F-77 



I-UH3U-EK. 

0007' 48 




LD 


C,B 


0008' 23 


6L2: 


INC 


HL 


0009' CD 0000« 


GL3: 


CALL 


DISP 


000C 3E 




DEFB 


3EH 


OOOD' Fl 


GL4: 


POP 


AF 


OOOE' DD CB 03 C6 


GL5: 


SET 


0, (IX+3) 


0012' CD 0000» 




CALL 


KKYB 


0015' DD CB 03 86 




RES 


0, CIX+3) 


0019' FE 80 




CP 


BOH 


001B' D4 0000» 




CALL 


NC,EXIT1 


001E' FE IE 




CP 


1EH 


0020' 38 06 




JR 


C,GL6 


0022' 77 




LD 


(HL),A 


0023' 10 E3 




DJNZ 


GL2 


0025' 04 




INC 


B 


0026' 3E 07 




LD 


A, 7 


0028' FE OD 


6L6: 


CP 


ODH 


002A' 28 27 




JR 


Z,SLCR 


002C' FE 02 




CP 


2 


002E' 38 21 




JR 


C, GLBRK 


0030' FE 09 




CP 


9 


0032' 28 DA 


GL7: 


JR 


Z,GL5 


0034' FE 18 




CP 


18H 


0036' 28 08 




JR 


Z, GLBSTP 


0038' FE OC 




CP 


OCH 


003A' 28 C7 




JR 


Z,GL1 


003C FE 08 




CP 


8 


003E' 20 C9 




JR 


NZ,GL3 


0040' F5 


GLBSTP: 


PUSH 


AF 


0041' 79 




LD 


A,C 


0042' B8 




CP 


B 


0043' 28 C8 




JR 


Z,GL4 


0045' 04 




INC 


B 


0046' 2B 




DEC 


HL 


0047' 3E 08 




LD 


A, 8 


0049' CD 0000» 




CALL 


DISP 


004C Fl 




POP 


AF 


004D' FE 08 




CP 


8 


004F' 18 El 




JR 


GL7 


0051' 3E OD 


GLBRK: 


LD 


A, ODH 


0053' F5 


GLCR: 


PUSH 


AF 


0054' CD 0000» 




CALL 


DISP 


0057' 36 00 




LD 


(HL>,0 


0059' Fl 




POP 


AF 


005A' El 




POP 


HL 


005B' CI 




POP 


BC 


005C C9 




RET 





PUFFER POINTER ELORE 

KARAKTER ECHO 

LD A,- 

1 SZO TORLES 

KEYB. SPEC. MOD BE 

BILLENTYU KOD BE 

SPEC. MOD KI 

SPEC. KOD? 

=IGEN, BASIC EXIT #1 



;=VEZ.KOD 

;KOD A PUFFERBE 

;=NINCS MEG TELE A SOR 

;B<-1 

;HIBA!, HANGJELZES 

;=CR, SORZARAS 

;=BREAK, SORZARAS 

;=H-TAB, ELNYELI 

;=SHIFT/<-, SORTORLES 

;=CLS, SOR ELOROL 

;=NEM BSTEP, ECHO+UJ BE 
;08H, 18H MENT 



URES MEG/MAR A PUFFER? 
=I6EN, SOR ELOROL 
SORHOSSZ SZLO-1 
POINTER VISSZA 

; BSTEP A DSP-RE 
;8, VAGY 18H 

;=8->GL5, =18H->GLBSTP 

;<CY)=1, HA BREAK 
fKURZOR A KOV. SORBA 
; TERMINATOR A PUFFERBE 
;(A)=ODH, BREAK, (CY)=1 
; PUFFER CIM-1 
;MENTETT BC 



F-78 



FOGGELfeK 



BEEP - ELEHI HAN6GENERAT0R V:'B4.1 



0000* 


FD 


E5 


0002' 


E5 




0003' 


C5 




0004' 


FD 


El 


0006' 


01 


FFFF 


0009 1 


3A 


0000« 


000C 


E6 


FC 


OOOE' 


CD 


0021' 


0011' 


' CD 


0021' 


0014' 


FD 


09 


0016 


' DA 


OOOE' 


0019' 


F6 


02 


001B 


' D3 


06 


001D 


' El 




001E 


' FD 


El 


0020 


' C9 




0021 


' EE 


13 


0023 


' D3 


06 


0025 


' 62 




0026 


' 6B 




0027 


' 09 




0028 


' DA 


0027' 


002B 


' C9 





EXT PORT 
ENTRY BEEP 



BEEP - ELEMI HANGGENERATOR 

A RUTIN A MEGADOTT HOSSZUSAGU, ES PERIODUS I- 
DEJU HANGOT GENERALJA A BELSO HANGSZORON ES A 
MAGNO FESZULTSEGKIMENETEN. 
HOSSZUSAG (T2) = 2*T1»(BC) MICROSEC 
PERIODUS/2 (Tl) = 8.4*<DE>+35 MIKROSEC 



REGISZTEREK: 



BE: 
KI: 

STK: 
BEEP: 



BEEPls 



BEEP2: 



BEEP3: 



(BC)= HANG HOSSZUSAG 
(DE)= PERIODUSIDO / 2 
(DE),(HL)= » 
(BC)= OFFFFH 
(AF)= ? 
8 BYTE 



PUSH 


IY 




PUSH 


HL 


;HENTES 


PUSH 


BC 


; I Y< -HOSSZUSAG 


POP 


IY 




LD 


BC,-1 




LD 


A, (PORT) 


f SYSTEM OUTPUT BYTE 


AND 


OFCH 


;MAGNO<-'0' 


CALL 


BEEP2 


fFELSO FELPERIODUS 


CALL 


BEEP2 


;ALSO FELPERIODUS 


ADD 


IY,BC 


;< -HOSSZUSAG- 1 


JP 


CrBEEPl 


;=HOSSZUSAG<>0 


OR 


2 


;HAGNO<-'GND» 


OUT 


(6), A 




POP 


HL 


;MENTETT ERTEK 


POP 


IY 




RET 






XOR 


13H 


;NOT(DUDA), NOT(MAG 


OUT 


(6), A 




LD 


H,D 


;HL< -PERIODUS / 2 


LD 


L f E 




ADD 


HL,BC 


;<-PERIODUS-l 


JP 


C f BEEPS 


;=PERIODUS<>0 


RET 
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FOGGELfeK 



KURPOZ - KURZOR POZICIOT MEGALLAPITO RUTIN V:'84.1 

EXT DCB 

KURPOZ - DSP KURZORCIM MEGHATAROZASA 

MEGALLAPITJA A KURZOR SORON BELULI AKTUALIS 
POZICIOJAT, ES EZT AZ ERTEKET KILEPESKOR AZ 
A REGISZTERBE TESZI. HA A KURZOR POZICIOJA 
NEM SZABVANYOS OSZLOP/SOR ERTEK, KILEPESKOR 
A CIM EZEN ERTEKHEZ LE6K0ZELEBB ESQ, DE NA- 
LA NAGYOBB ERTEK LESZ. VIZSZINTES IRAS ESE- 
TEN, HA 0SZL0PCIM<4, A POZICIO =0 LESZ. 



REGISZTEREK: 



BE: 
KI: 



STK: 



0000' 


E5 




KURPOZ: 


0001' 


21 


0005* 




0004' 


CB 


46 




0006' 


23 






0007' 


20 


OF 




0009' 


' 7E 






OOOA' 


D6 


04 




OOOC 


' 21 


FF06 


KURP01: 


OOOF' 


38 


01 




0011 


' 95 




KURP02: 


0012' 


24 




KURP03: 


0013 


' 30 


FC 




0015' 


7C 






0016 


' El 






0017 


' C9 






0018 


' 23 




KURP04: 


0019 


' 3E 


BF 




001B 


' 96 






001C 


' 18 


EE 





NINCS 

(BC),(DE),(HL)= * 
<A)= KURZOR POZICIO 
(F)= ? 
4 BYTE 



PUSH 

LD 

BIT 

INC 

JR 

LD 

SUB 

LD 

JR 

SUB 

INC 

JR 

LD 

POP 

RET 

INC 

LD 

SUB 

JR 



HL 

HL,DCB+5 

0, (HL) 

HL 

NZ,KURP04 

A, (HL) 

4 

HL,0FF06H 

CKURP03 

L 

H 

NCKURP02 

A,H 

HL 

HL 

A, 191 
(HL) 
KURP01 



;REGISZTER MENTES 
;DSP FLAG-BYTE CIME 



=FUGGOLEGES IRAS 
DSP OSZLOPCIM 
ELTOLAS KI 
H(- -1, L<-6 
=0SZL0PCIM<4 
6-AL CSOKKENTES 
SZLO NOVELESE 
=LE LEHET MEG VONNI 
KURPOZ (-SZAMLALO 
HENTETT HL 



;MAX SORCIM 
;DSP SORCIME 



F-80 



FOGGELfeK 



DIRCUR - DIREKT KURZOR CIMZtS RUTIN V:»84.1 

EXT DCB 

DIRCUR - DIREKT KURZOR CIMZES SZUBRUTIN 

A REGISZTEREKBEN ME6AD0TT SOR/OSZLOP CIMRE 
ALLITJA A DISPLAY KURZORT. 
HA A MEGADOTT SOR/OSZLOP SZAM TUL NAGY, A 
VEZERLEST - HIBAJELZESSEL - VISSZAKAPJA A 
HIVO RUTIN. ILYEN ESETBEN A KURZOR POZICI- 
OJA NEM VALTOZIK. 



REGISZTEREK: 



BE: 
KI: 

STK: 



(D)= SOR-SZ V.=0..15 f F.=0..20 

(E)= OSZLOP-SZ V.=0. .41, F.=0..31 

<BC),(DE), <HL)= * 

(A)= ? 

(CY)= C, TUL NAGY SOR/OSZLOP SZAM 

4 BYTE 



0000 


' 3E 


14 


DIRCUR: 


LD 


A, 20 


;MAX SOR-SZ 


0002 


' BA 






CP 


D 




0003 


' D8 






RET 


C 


;=TUL NAGY SOR-SZ 


0004 


' 3E 


29 




LD 


A, 41 


;MAX OSZLOP-SZ 


0006 


' BB 






CP 


E 




0007 


' D8 






RET 


C 


;=TUL NAGY OSZLOP-SZ 


0008 


' E5 






PUSH 


HL 


;REGISZTER MENT 


0009 


' 7A 






LD 


A,D 


;S0RCIM<-S-SZ*12+1 


OOOA 


' 87 






ADD 


A, A 




OOOB 


' 82 






ADD 


A,D 


; 3*S-SZ 


OOOC 


' 87 






ADD 


A, A 




OOOD 


' 87 






ADD 


A, A 


; 12*S-SZ 


OOOE 


' 3C 






INC 


A 




OOOF 


' 67 






LD 


H,A 


;SORCIM MENT 


0010' 


' 7B 






LD 


A,E 


; 0SZL0PCIM<-0-SZ«6+4 


0011 


' 87 






ADD 


A, A 




0012' 


' 83 






ADD 


A,E 


;3«0-SZ 


0013 


' 87 






ADD 


A, A 




0014' 


C6 


04 




ADD 


A, 4 


;6*0-SZ+4 


001G 


' 6F 






LD 


L,A 


;OSZLOPCIM MENT 


0017' 


DD 


CB 05 46 




BIT 


0,(IX+5) 




001B 


' 20 


OA 




JR 


NZ,DIRCU3 


;=FUGGOLEGES IRAS 


001D' 


3E 


BF 




LD 


A, 191 


;MAX SORCIM 


001F 


' BC 






CP 


H 




0020' 


38 


03 




JR 


CDIRCU2 


j=TUL NAGY SORSZAM 


0022 


r 22 


0006* 


DIRCU1: 


LD 


<DCB+6),HL 


ySOR/OSZLOPCIM MENT 


0025' 


El 




DIRCU2: 


POP 


HL 


;REGISZTER VISSZA 


0026' 


' C9 






RET 






0027' 


3E 


C3 


DIRCU3: 


LD 


A, 195 


:MAX SORCIM+4 
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0029' 


MJUHll 
95 


002A' 


38 F9 


002C' 


24 


002D' 


24 


002E' 


24 


002F' 


6C 


0030' 


67 


0031' 


18 EF 



SUB 


L 


JR 


CDIRCU2 


INC 


H 


INC 


H 


INC 


H 


LD 


UH 


LD 


H,A 


JR 


DIRCU1 



;=TUL NA6Y 0SZL0PSZAM 
; SORCIM< -S-SZ* 12+4 



;OSZLOPCIM<-SORCIM 
;SORCIM<-OSZLOPCIH 



F-82 



FOGGELfeK 



ROIMT - ELEMI PONT HOVELETEK V:'84.1 



le\Yq^ l|.-66cr 



5"f3b 



!b 



0000' 


3E BF 


0002' 


92 


0003' 


D8 


0004' 


57 


0005' 


E5 


0006' 


CD 0029' 


0009' 


El 


000A' 


C9 



000B' 3E BF 
OOOD' 92 
OOOE' D8 



EXT DCB,MTAB 

SETDOT - GRAFIKUS PONT BEKAPCSOLASA 

A RUTIN BEKAPCSOLJA A MEGADOTT KOORDINATAJU 
GRAFIKUS PONTOT A KEPERNYO AKTUALIS ALAPSZI- 
NENEK MEGFELELOEN. A KURZOR NEM MOZDUL EL. 
HA AZ ADOTT PONT A KEPERNYON KIVULRE ESNE, A 
VEZERLEST - HIBAJELZES KISERETEBEN - A HIVO 
RUTIN VI6SZAKAPJA ES RAJZOLAS NEM TORTENIK. 



RE6ISZTEREK: 



BE: 
KI: 



STK: 



(DE)= ABSZOLUT KOORDINATAK 

(DE)= KONVERTALT KOORDINATAK 

(A),(B),(HL)= * 

(C)= ? (BIT MASZK) 

(CY>= C, HIBAS Y-KOORDINATA 

10 BYTE 



SETDOT: 



SETD01: 



LD 


A, 191 


;MAX Y-KOORD 


SUB 


D 


;0->191, 191->0 


RET 


C 


;=TUL NAGY Y-KOORD 


LD 


D,A 


;D< -KONVERTALT Y-KOORD 


PUSH 


HL 


fREGISZTER MENT 


CALL 


SETD1 


;PONT BEKAPCSOLAS 


POP 


HL 




RET 







CLRDOT - GRAFIKUS PONT KIKAPCSOLASA 

A RUTIN KIKAPCSOLJA A MEGADOTT KOORDINATAJU 
GRAFIKUS PONTOT A KEPERNYO AKTUALIS ALAPSZI- 
NENEK MEGFELELOEN. A KURZOR NEM MOZDUL EL. 
HA AZ ADOTT PONT A KEPERNYON KIVULRE ESNE, A 
VEZERLEST - HIBAJELZES KISERETEBEN - A HIVO 
RUTIN VISSZAKAPJA ES RAJZOLAS NEM TORTENIK. 



REGISZTEREK: 

BE: 

KI: 



STK: 



CLRDOT: 



(DE)= ABSZOLUT KOORDINATAK 

(DE)= KONVERTALT KOORDINATAK 

<A),(B),(HL)= * 

(C)= ? (BIT MASZK) 

(CY)= C, HIBAS Y-KOORDINATA 

10 BYTE 



LD A, 191 
SUB D 
RET C 



;MAX Y-KOORD 
;0->191, 191->0 
;=TUL NAGY Y-KOORD 



F-83 



FOGGELtK 



OOOF' 57 
OOIO' E5 
0011' CD 0037' 
0014' El 
0015' C9 



CLRD01 : 



LD D,A 
PUSH HL 
CALL CLRD1 
POP HL 
RET 



;D<-KONVERTALT Y-KOORD 
jREGISZTER MENT 
;PONT KIKAPCSOLAS 



\bm 



TSTDOT - GRAFIKUS PONT TESZTELESE 

MEGVIZSGALJA A DE REGISZTER-PAR ALTAL CIMZETT 
PONT ALLAPOTAT ES ANNAK MEGFELELOEN BEALLITJA 
A Z-FLAG ERTEKET. 

HA AZ ADOTT PONT A KEPERNYON KIVULRE ESNE, A 
VEZERLEST - HIBAJELZESSEL - A HIVO RUTIN KAP- 
JA VISSZA. ILYENKOR A Z-FLAG DEFINIALATLAN. 



REGISZTEREK: 



BE: 

KI: 



STK: 



(DE)= ABSZOLUT KOORDINATAK 

(DE)= KONVERTALT KOORDINATAK 

(B)= * 

(A),(HL)= ? 

(C) = ? (BIT MASZK) 

(CY)= C, HIBAS Y-KOORDINATA 

(Z)= NZ, A PONT AKTIV 

4 BYTE 



0016' 


3E BF 




TSTDOT: 


LD 


A, 191 


0018' 


92 






SUB 


D 


0019' 


D8 






RET 


C 


001A' 


57 






LD 


D, A 


00 IB' 


CD 0046' 


TSTD1: 


CALL 


CIMGEN 


001E' 


DD CB 


05 6E 




BIT 


5, (IX+5) 


0022' 


20 02 






JR 


NZ,TSTD2 


0024' 


A6 






AND 


(HL) 


0025' 


C9 






RET 




0026' 


A6 




TSTD2: 


AND 


(HL) 


0027' 


A9 






XOR 


C 


0028' 


C9 






RET 










■ SETD1 - 


- GRAFIKUS PONT BE 


0029' 


F5 




SETD1: 


PUSH 


AF 


002A' 


CD 0046' 


SETD2: 


CALL 


CIMGEN 


002D' 


DD CB 


05 4E 


SETD3: 


BIT 


l F (IX+5) 


0031' 


20 OE 






JR 


NZ,CLRD4 


0033' 


B6 




SETD4: 


OR 


(HL) 


0034' 


77 






LD 


(HL),A 


0035' 


Fl 






POP 


AF 


0036' 


C9 






RET 





MAX Y-KOORD 
0->191, 191->0 
=TUL NAGY Y-KOORD 
D< -KONVERTALT Y-KOORD 
C<-MASZK f HL<-CIM 
INVERZ HATTER? 
=INVERTALT RAJZ 
Z<-NZ, HA VILAGOS 



;Z<-NZ, HA SOTET 



;C<-MASZK f HL<-CIM 

=INVERTALT RAJZ 
PONT BEKAPCSOLAS 
RAM < -PONT 



CLRD1 - GRAFIKUS PONT KIKAPCSOLASA 



F-84 



FOGGELtK 



0037' 


F5 




CLRD1: 


PUSH 


AF 




0038 ' 


CD 


0046' 


CLRD2: 


CALL 


CIMGEN 


jC<-MASZK, HL<-CIM 


003B' 


DD CB 05 4E 


CLRD3: 


BIT 


l,(IX+5) 




003F 1 


20 


F2 




JR 


NZ,SETD4 


;=INVERTALT RAJZ 


0041' 


2F 




CLRD4: 


CPL 




;A<-KOMPLEMENS MASZK 


0042 ' 


' A6 






AND 


(HL) 


;PONT KIKAPCSOLAS 


0043' 


77 






LD 


(HL),A 


; RAH < -PONT 


0044' 


Fl 






POP 


AF 




0045' 


C9 






RET 






16126 




J CIMGEN - 


RAM-CIM GENERATOR 




0046' 


21 


0000« 


CIHGEN: 


LD 


HL,MTAB 


;MASZKTABLA (LAPHATAR! 


0049 


7B 






LD 


A,E 




004A' 


E6 


07 




AND 


7 


j BIT CIM 


004C 


' 85 






ADD 


A,L 




004D' 


6F 






LD 


L f A 


;HL<-MASZK CIME 


004E' 


4E 






LD 


C, (HL) 


;C< -MASZK 


004F' 


3A 


0008* 




LD 


A, (DCB+8) 


;RAM-START-H 


0052 > 


' 6B 






LD 


L f E 


;L<-OSZLOPCIM 


0053' 


62 






LD 


H,D 


;H<-SORCIM 


0054 


' CB 


3C 




SRL 


H 


;A SOR/OSZLOP CIMBOL 


0056' 


CB 


ID 




RR 


L 


;KEPZETT 16 BITES ERTE 


0058 


' CB 


3C 




SRL 


H 


;KET 8-AL OSZTVA MEG- 


005A' 


CB 


ID 




RR 


L 


;JUK A KARESETT PONTOT 


005C 


CB 


3C 




SRL 


H 


;TARTALMAZO BYTE RELA- 


005E' 


CB 


ID 




RR 


L 


;TIV RAM-CIMET 


0060 » 


' 84 






ADD 


A,H 




0061' 


67 






LD 


H f A 


;HL<-BYTE ABSZ. CIME 


0062 


' 79 






LD 


A,C 


;A< -MASZK 


0063" 


C9 






RET 







F-85 



FOGGELfeK 



MA6NO - MA6N0 KEZELO RUTINOK V:'84.1 






002E 
008A 
0021 



EXT DIRCUR,DISP,PORT,NAMERM f DCB 

ENTRY WRHEAD,ENDREC f WRSYN,MTRON,MTROFF f WRREC,WRRECl 

ENTRY RDHEAD, CHKSUM, PRGREC, RDSYN, INBYTE, CASDSP 



MA6NETQF0N HANDLER 

A MABNETOFON HANDLER E6YES RUTINJAI A FILE- 
OK KULONBOZO RESZEINEK (HEADER, PROGRAH ES 
ADAT BLOKK, END BLOKK) FELIRASAT ES VISSZA- 
TOLTESET VESZIK. 

NA6NET0F0N IDOALAPOK: 



TETA2 


EQU 


46 


;2«ID0ALAP 


TETA6 


EQU 


138 


?6»ID0ALAP 


TETA15 


EQU 


33 


;1.5«ID0ALAP 



URREC - PROGRAM ES ADAT BLOKK FELIRASA 



RE6ISZTEREK: 
BE: 



KI: 



0000' 


' AF 




0001 


' ED 


52 


0003' 


' EB 




0004 


' C8 




0005' 


' AF 




0006 


' E5 




0007' 


C5 




0008 


' ED 


42 


OOOA 1 


' CD 


009D' 


OOOD 


' 3A 


001 A* 


0010" 


CD 


00B4' 


0013 


' 3A 


001C» 


0016' 


C6 


01 


0018 


' 27 




0019' 


4F 





STK: 



URREC: 



WRREC1: 



(BC)=ELTOLASI CIH /OFFSZET/ 

(DE)=MEMORIATERULET KEZDOCIME 

(HL)=HEMORIATERULET VEGCIME 

(DCB+26)=A BLOKK TIPUSA 

(DCB+28)=A BLOKK SORSZAMA 

(BC)=* 

(DE)=0 

<HL)-MEMORIATERULET VEGCIME 

(A)=? 

(DCB+26)=* 

(DCB+28)=A BLOKK SORSZAMA+1 

14 BYTE 



XOR 


A 


SBC 


HL,DE 


EX 


DEfHL 


RET 


Z 


XOR 


A 


PUSH 


HL 


PUSH 


BC 


SBC 


HL,BC 


CALL 


WRSYN 


LD 


A,(DCB+26) 


CALL 


OBYTE 


LD 


A,(DCB+28) 


ADD 


A,l 


DAA 




LD 


C,A 



BLOKK FELVETELE, CY<-0 

(HL)=BYTEOK SZAMA 

(DE)=BYTEOK SZAMA 

=BYTEOK SZAMA NULLA 

CY<-0 

REGISZTER MENTESE 

OFFSZET CIM KEPZESE 
BLOKK SZINKRON FELIRAS 
(A)=BLOKK TIPUSA 
BLOKK TIPUS FELIRASA 
(A)=BLOKK SORSZAMA 
BLOKK SORSZAMA+1 
BLOKK SORSZAMA BCD ! 
CHECKSUM=BLOKK SORSZ. 
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FOGBELiK 



OOIA' 


32 


001C* 


LD 


(DCB+28),A 


OOID' 


CD 


00B4' 


CALL 


OBYTE 


0020 » 


7D 




LD 


A,L 


0021' 


CD 


OOBO' 


CALL 


MBYTE 


0024 » 


7C 




LD 


A,H 


0025' 


CD 


00B0» 


CALL 


WBYTE 


0028' 


7B 




LD 


A,E 


0029' 


CD 


OOBO' 


CALL 


WBYTE 


002C 


El 




POP 


HL 


002D' 


E3 




EX 


<SP),HL 


002E' 


43 




LD 


B,E 


002F' 


7E 


URREC3: LD 


A, (HL) 


0030' 


23 




INC 


HL 


0031' 


CD 


OOBO' 


CALL 


WBYTE 


0034' 


IB 




DEC 


DE 


0035' 


10 


F8 


DJNZ 


WRREC3 


0037' 


79 




LD 


A,C 


0038' 


CD 


00B4' 


CALL 


OBYTE 


003B' 


7A 




LD 


A,D 


003C 


B3 




OR 


E 


003D' 


CI 




POP 


BC 


003E' 


20 


C5 


JR 


NZ,WRREC1 


0040' 


C9 




RET 





UJ BLOKK SORSZ. MENTES 
BLOKK SORSZ. FELIRASA 
MEMORIATER. KEZDOCIM 
ALSO BYTE FELIRASA 
MEMORIATER. KEZDOCIM 
FELSO BYTE FELIRASA 
A BLQKKBAN LEVO BYTEOK 
DARABSZAMANAK FELIRASA 
REG. VISSZAMENTES 
(HL)=MEMORIA CIME 
(B)=BYTEOK SZAMA 
AKTUALIS BYTE BEVETELE 
(HL)=KOV. MEMORIA CIME 
AKTUALIS BYTE FELIRASA 
BYTEOK SZAMA - 1 
=NINCS TELE A BLOKK 
(A)=CHECKSUM 
CHECKSUM FELIRASA 
ELOKESZIT. VIZSGALATRA 
<D> * (E) = ? 
REG. VISSZAMENTES 
=VAN MEG KIVIENDO BYTE 



WRHEAD - HEADER-BLOKK FELIRAS 



REGISZTEREK: 



BE: 



KI: 



STK: 



(HL)=FILE-NEV LEIRO CIM 

(DCB+26)=A FILE TIPUSA 

(DCB+2B)=1 

(HL),(DE),(BC),(AF)=? 

(DCB+26)=* 

10 BYTE 



0041' 


CD 


00E4' 


WRHEAD: 


CALL 


MTRON 


0044' 


06 


05 




LD 


B,5 


0046' 


C5 




SAVE1: 


PUSH 


BC 


0047' 


01 


0000 




LD 


BC,0 


004A' 


OB 




SAVE2: 


DEC 


BC 


004B' 


78 






LD 


A,B 


004C 


Bl 






OR 


C 


004D' 


20 


FB 




JR 


NZ,SAVE2 


004F' 


CI 






POP 


BC 


0050' 


10 


F4 




DJNZ 


SAVE1 


0052' 


01 


0200 




LD 


BC,512 


0055' 


3E 


AA 


SAVE3: 


LD 


A,OAAH 


0057' 


CD 


00B4' 




CALL 


OBYTE 


005A* 


OB 






DEC 


BC 


005B' 


78 






LD 


A,B 


005C 


Bl 






OR 


C 



MOTOR BEKAPCSOLAS 
4 SEC. CSEND FELIRASA 
IDOKONSTANS MENTESE 
BELSO IDOZITO CIKLUS 
KONSTANS CSOKKENTESE 
ELOKESZIT. VIZSGALATRA 
(B) & (C) = ? 
=VAN MEG I DO ! 
IDOKONST. VISSZATOLTES 
=VAN MEG I DO ! 
FILE SZINKRON FELIRASA 
SZINKRON BYTE = OAAH 
1 DB SZINKRON BYTE KI 
DARABSZAM CSOKKENTESE 
ELOKESZIT. VIZSGALATRA 
<B> 4 (C> = ? 



F-87 



005D' 


FOGGELtK 

20 F6 


005F' 


CD 009D' 


0062' 


3A 001A* 


0065' 


CD 00B4' 


0068' 


AF 


0069' 


4F 


006A' 


32 001C« 


006D' 


CD 00B4' 


0070' 


7E 


0071' 


CD OOBO* 


0074' 


47 


0075' 


23 


0076' 


7E 


0077' 


23 


0078' 


66 


0079' 


6F 


007A' 


7E S 


007B' 


CD OOBO' 


007E' 


23 


007F' 


10 F9 


0081' 


79 


0082' 


C3 00B4' 



SAVE4: 



JR 


NZ.SAVE3 


CALL 


WRSYN 


LD 


A, (DCB+26) 


CALL 


OBYTE 


XOR 


A 


LD 


C,A 


LD 


(DCB+28),A 


CALL 


OBYTE 


LD 


A, (HL) 


CALL 


WBYTE 


LD 


B,A 


INC 


HL 


LD 


A,(HL) 


INC 


HL 


LD 


H,(HL) 


LD 


L,A 


LD 


A, (HL) 


CALL 


WBYTE 


INC 


HL 


DJNZ 


SAVE4 


LD 


A,C 


JP 


OBYTE 



=VAN ME6 BYTE ! 
BLOKK SZINKRON FELIRAS 
(A)=FILE TIPUSA 
FILE TIPUS FELIRASA 
REKORD SORSZAM=0 
CHKSUM=0 

REKORD SORSZAM MENTESE 
REKORD SORSZAM FELIRAS 
(A)=FILE NEV HOSSZ 
FILE NEV HOSSZ FELIRAS 
(B)=KARAKTEREK SZAHA 
<HL)=FILE NEV CIME 
CIM ALSO BYTE BE 
FELSO BYTE CIME 
CIM FELSO BYTE BE 
(HL)=NEV 1. KAR. CIME 
FILE NEV FELIRASA 
AKTUALIS KAR. FELIRASA 
(HL)=KOV. KAR. CIME 
=VAN MEG KARAKTER ! 
(A)=HEADER CHECKSUM 
CHECKSUM FELIRASA 



ENDREC - END-BLOKK FELIRASA 



REGISZTER: 
BE: 

KI: 



STK: 



(DCB+26)=A BLOKK TIPUSA 
(DCB+28)=A BLOKK SORSZAMA 
<DCB+28)=BL0KK SORSZAM+1 
( DCB+26 )=* 

(HL),(DE),(BC),(AF)=? 
10 BYTE 



0085' 


CD 


009D» 


0088' 


3A 


001 A* 


008B' 


CD 


00B4' 


OOBE' 


3A 


001C* 


0091' 


C6 


01 


0093' 


27 




0094' 


CD 


00B4' 


0097' 


CD 


00B4' 


009A' 


C3 


00E6' 



ENDREC: 



CALL WRSYN 

LD A, (DCB+26) 

CALL OBYTE 

LD A, (DCB+28) 

ADD A, 1 

DAA 

CALL OBYTE 

CALL OBYTE 

JP MTROFF 



END-BLOKK SZINKRON KI 
(A)=BLOKK TIPUS 
BLOKK TIPUS FELIRASA 
(A)=REGI BLOKK SORSZAM 
(A)=UJ BLOKK SORSZAM 
A BLOKK SORSZAM BCD ! 
BLOKK SORSZAM FELIRASA 
CHECKSUM FELIRASA 
MOTOR KIKAPCSOLASA 



WRSYN - BLOKK SZINKRON FELIRASA 

REGISZTEREK: 

BE: NINCS 

KI: (HL), (DE),(C)=* 

(B)=0 

(A)=0D3H 



F-88 



FOGGEL£K 







; STK: 


8 BYTE 


009D» 


06 60 


WRSYN: 


LD B f 96 


009F' 


3E FF 




LD A,OFFH 


00A1' 


CD 00B4' 


SAVE6: 


CALL OBYTE 


00A4' 


10 FB 




DJNZ SAVE6 


00A6' 


3E D3 




LD A, 0D3H 


0OA8' 


06 03 




LD B,3 


OOAA' 


CD 00B4' 


SAVE7: 


CALL OBYTE 


(X)AD' 


10 FB 




DJNZ SAVE7 


OOAF' 


C9 




RET 



BLOKK SZINKR0N=96»0FFH 
(A)=SZINKRON BYTE 
SZINKRON BYTE FELIRASA 
=VAN MEG BYTE ! 
SZINKRONIZALO KAR.=D3H 
IGY BIZT0NSA60SABB ! 
SZINKR. KAR. FELIRASA 
=VAN MEG SZINKR. KAR. ! 



MBYTE - EGY BYTE FELIRASA 



REGISZTEREK: 



BE: 
KI: 
STK: 



OOBO 


' F5 




WBYTE: 


00B1 


' 81 






00B2 


' 4F 






00B3 


' Fl 






00B4 


' C5 




OBYTE: 


OOBS 


' OE 


08 




00B7 


' 07 




OBIT: 


00B8 


' F5 






00B9 


' 06 


2E 




OOBB 


' 38 


02 




OOBD 


' 06 


8A 




OOBF 


' C5 




0BIT1: 


OOCO 


' 3A 


0000* 




00C3 


' F6 


03 




00C5 1 


' DD CB 14 5E 




0OC9 


' 20 


02 




OOCB 


' F6 


10 




OOCD 


' D3 


IE 


0BIT11 


OOCF 1 


' 00 




0BIT2: 


OODO 


' 10 


FD 




00D2 1 


' E6 


EC 




00D4 1 


' D3 


IE 




00D6' 


CI 






00D7' 


00 




0BIT3: 


00D8< 


10 


FD 




OODA' 


F6 


01 




OODC 


D3 


IE 




OODE' 


Fl 






OODF' 


OD 







(A)=FELIRAND0 BYTE 
(C)=EDDIGI CHECKSUM 
<HL) f <DE),(B),(AF)=» 
(C)=UJ CHECKSUM 
6 BYTE 



PUSH 


AF 


;REGISZTER MENTESE 


ADD 


A,C 


;(C)=REGI CHECKSUM 


LD 


C,A 


; (C)=UJ CHECKSUM 


POP 


AF 


;REG. VISSZAMENTES 


PUSH 


BC 


fREGISZTER MENTESE 


LD 


C,8 


;1 BYTE=8 BIT 


RLCA 




fCY<-BIT 


PUSH 


AF 


;FELIRANDO BYTE MENTESE 


LD 


B,46 


;312 MIKROSEC. IDOZITES 


JR 


CrOBITl 


;=BIT=1 ! 


LD 


B,138 


;93B MIKROSEC. IDOZITES 


PUSH 


BC 


(IDOKONSTANS MENTESE 


LD 


A, (PORT) , 


;(A)=I/0 PORT ALLAPOTA 


OR 


3 


;(PORT)=MAGAS SZINT 


BIT 


3, (IX+20) i 


,HANGADAS ENGEDELYEZVE? 


JR 


NZ,0BIT11 


;=HANG LETILTVA ! 


OR 


10H ; 


■HANG ENGEDELYEZVE ! 


OUT 


(1EH),A ; 


SZINT KI A VONALRA 


NOP 




IDOZITES 


DJNZ 


0BIT2 


=VAN MEG I DO ! 


AND 


OECH | 


(PORT)=ALACSONY SZINT 


OUT 


(1EH),A ; 


SZINT KI A VONALRA 


POP 


BC ; 


IDOKONST. VISSZAMENTESE 


NOP 




IDOZITES 


DJNZ 


0BIT3 i 


=VAN MEG I DO ! 


OR 


01H ; 


( PORT ) =NULLPOTENC I AL 


OUT 


<1EH),A ; 


SZINT KI A VONALRA 


POP 


AF j 


(A)=FELIRANDO BYTE 


DEC 


C ; 


BITEK SZAMANAK CSOKK. 



F-89 
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OOEO' 20 D5 
00E2' CI 
00E3' C9 



00E4' AF 
00E5' 3E 



JR NZ,OBIT 
POP BC 
RET 



;=VAN l"EG BIT 
;RE6. VISSZAMENTESE 



MTRON - MAGNETOFON MOTOR BEKAPCSOLASA 



XOR A 
DEFB 3EH 



; FLAG < -MTRON 
;LD A,- 



O0E6' 


37 M 


00E7' 


3A 0000* 


OOEA' 


CB 97 


OOEC 


30 02 


OOEE' 


F6 04 


OOFO' 


D3 IE 


00F2' 


32 0000* 


OOFS' 


C9 



MTRON: 

MTROFF - MAGNETOFON MOTOR KIKAPCSOLASA 
MTROFF: 



SCF 




FLAG (-MTROFF 


LD 


A, (PORT) i 


(A)=I/0 PORT ALLAPOTA 


RES 


2,A i 


,TAWEZ(-BE 


JR 


NC, S+4 , 


;=MTRON FOLYIK 


OR 


4 


|TAVVEZ(-KI 


OUT 


(lEH)rA 


;SZINT KI AVONALRA 


LD 


(PORT), A 


jSTATUSZ MENTESE 


RET 







RDHEAD - HEADER KERESES/BEOLVASAS 



REGISZTEREK: 



BE: 



KI: 



STK: 



(HL)=FILE-NEV LEIRO CIME 
(DCB+20)=MA6NO ALLAPOTJELZO BYTE 
(DCB+26)=BL0KK TIPUSA 
(DCB+27)=HIBAS BLOKKOK SZAMA 
(DCB+29)=FAZISF0RDITAS FLAG 
(DCB+30)=SZAMITOTT BIT I DO 
(HL), (DE),(BC),(AF)=? 
24 BYTE 



00F6' 


3E 


06 


RDHEAD: 


LD 


00F8' 


CD 


029F' 




CALL 


OOFB' 


CD 


00E4' 




CALL 


OOFE' 


E5 






PUSH 


OOFF' 


AF 




LOADO: 


XOR 


0100' 


32 


00 IB* 




LD 


0103' 


11 


OFOO 




LD 


0106' 


CD 


02A7' 




CALL 


0109' 


CD 


0279' 




CALL 


010C 


OE 


04 




LD 


010E' 


IE 


00 




LD 


0110' 


53 




IDEN11: 


LD 


0111' 


DB 


IF 


I DENT 1: 


IN 


0113' 


Al 






AND 


0114' 


28 


FB 




JR 


0116' 


43 




IDEN10: 


LD 


0117' 


DB 


IF 


IDENT2: 


IN 


0119' 


04 






INC 



A, 6 

CASDSP 

MTRON 

HL 

A 

(DCB+27),A 

DE,OFOOH 

CASDIR 

SPAUSE 

C,4 

E,0 

D,E 

A, (1FH) 

C 

Z,IDENT1 

B,E 

A, (1FH) 

B 



(A)=DISP. VEZERLO BYTE 
PRECLEAR BEKAPCSOLASA 
MOTOR BEKAPCSOLAS 
FILE NEVLEIRO CIM MENT 

HIBAS BLOKKOK SZANA=0 
KURZOR P0ZICI0=15.S0R 
LEGELSO KARAKTERE 
FILE HEADER KERESESE 
MAGNO AZONOSITAS KEZD. 

FAZISFORDITAS FLAG<-0 
MAGAS SZINT KIVARASA 

=MEG ALACSONY SZINT 
IDOSZAMLALO(-0 
ETALON MAGAS MERESE 
IDOSZAMLALO NOVELESE 



F-90 



011A' 


AB 




XOR 


E 


— ruoucj-Eis. 


011B' 


Al 




AND 


C ; 


MAGNETOFON VONAL VIZSG. 


one 


C2 0117' 




JP 


NZ f IDENT2 ; 


=MEG MA6AS SZINT 


OUF' 


78 




LD 


A,B ; 


<A)=IDOSZAMLALO 


0120' 


FE 2E 




CP 


TETA2 ; 


MAGAS SZINT VIZSGALATA 


0122' 


38 ED 




JR 


C, IDENT1 ; 


=MAGAS SZINT<2*ID0ALAP 


0124' 


FE 8A 




CP 


TETA6 




0126' 


30 E8 




JR 


NCIDENH ; 


=MAGAS SZINT>=6*ID0ALAP 


0128' 


43 




LD 


B,E i 


IDOSZAMLALO<-0 


0129' 


DB IF 


IDENT3: 


IN 


A,(1FH) j 


ETALON ALACSONY MERESE 


012B' 


04 




INC 


B i 


IDOSZAMLALO NOVELESE 


012C 


AB 




XOR 


E 




012D' 


Al 




AND 


C i 


MAGNETOFON VONAL VIZSG. 


012E' 


CA 0129' 




JP 


Z, IDENT3 j 


=MEG ALACSONY SZINT 


0131' 


78 




LD 


A,B , 


;(A)=IDOSZAMLALO 


0132' 


15 




DEC 


D ; 


■PULZUSSZAMLALO-1 


0133' 


FE 21 




CP 


TETA15 




0135' 


38 06 




JR 


C IDENT4 | 


;=AKTIV MAGAS SZINT 


0137' 


14 




INC 


D 


; PULZUSSZAMLALO+1 


0138' 


FE 8A 




CP 


TETA6 


(ZAVARJEL VIZSGALATA 


013A' 


30 D4 




JR 


NCIDENH 


}=TUL HOSSZU ALACSONY 


013C 


14 




INC 


D 


(PULZUSSZAMLALO+1 


013D' 


7A 


IDENT4: 


LD 


A,D 


;(A)=PULZUSSZAM 


013E' 


FE 10 




CP 


16 


(FORDIT FAZIST? 


0140' 


28 04 




JR 


Z,IDENT8 


f=NEM FORDIT 


0142' 


FE EF 




CP 


239 




0144' 


20 DO 




JR 


NZ f IDEN10 


j=TUL KEVES MI NT A i 


0146' 


32 001D* 


IDENT8: 


LD 


(DCB+29) f A 


; ALLAPOTJELZO BYTE MENT 


0149' 


43 




LD 


B,E 


(CIKLUSSZAM=256 


014A' 


6B 




LD 


L,E 


jALAPIDOOSSZEG TAROLO 


014B' 


63 




LD 


H,E 


fTAROLO TORLESE 


014C 


D5 


IDENT7: 


PUSH 


DE 


fALAPIDO MERESE 


014D' 


DB IF 


I DENTS: 


IN 


A, (1FH) 


; MAGAS SZINT KIVARASA 


014F' 


AA 




XOR 


D 


jFAZISFORD. KORREKCIO 


0150' 


Al 




AND 


C 


; MAGNETOFON VONAL VIZSG. 


0151' 


CA 014D' 




JP 


Z, IDENT5 


j=MEG ALLACSONY SZINT 


0154' 


IE 00 




LD 


E,0 


;IDOSZAMLALO<-0 


0156' 


DB IF 


IDENT6: 


IN 


A, (1FH) 


jMAGASSZINT MERESE 


0158' 


1C 




INC 


E 


; IDOSZAMLALO NOVELESE 


0159' 


AA 




XOR 


D 


jFAZISFORD. KORREKCIO 


015A' 


Al 




AND 


C 


i MAGNETOFON VONAL VIZSG. 


015B' 


C2 0156' 




JP 


NZ, IDENT6 


j=MEG MAGAS SZINT 


015E' 


7B 




LD 


A f E 


;(A)=IDOALAP 


015F' 


FE 8A 




CP 


TETA6 


; ZAVARJEL VIZSGALATA 


0161' 


30 EA 




JR 


NC, IDENT5 


;=TUL HOSSZU 


0163' 


16 00 




LD 


D,0 


;FELSO BYTE <-0 


0165' 


19 




ADD 


HL,DE 


;IDOALAP OSSZEGZESE 


0166' 


Dl 




POP 


DE 


;(D)=MASZK , <E)=0 


0167' 


10 E3 




DJNZ 


IDENT7 


;=ME6 NINCS VEGE 


0169' 


7C 




LD 


A,H 


; (A)=IDOALAP OSSZEG/256 
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FOGGELfeK 


016A' 


32 001E* 


016D' 


CD 0235' 


0170' 


DD BE 1A 


0173' 


20 8A 


0175' 


53 


0176' 


CD 026B' 


0179' 


B7 


017A' 


C2 OOFF' 


017D' 


CD 026B' 


0180' 


47 


0181' 


4F 


0182' 


21 0000* 


0185' 


CD 026B' 


0188' 


77 


0189' 


23 


018A' 


10 F9 


018C 


3E 10 


018E' 


91 


018F' 


28 06 


0191' 


47 


0192' 


36 20 


0194' 


23 


0195' 


10 FB 


0197' 


11 0F08 


019A' 


CD 02A7' 


019D' 


CD 026B' 


01A0' 


El 


01A1' 


DD CB 14 56 


01A5' 


28 17 


01A7' 


E5 


01A8' 


11 0000* 


01AB' 


46 


01AC 


79 


01AD' 


B8 


01AE' 


38 IF 


01B0' 


23 


01B1' 


7E 


01B2' 


23 


01B3' 


66 


01B4' 


6F 


01B5' 


1A 


01B6' 


BE 


01B7' 


20 16 


01B9' 


13 


01BA' 


23 


01BB' 


10 F8 


01BD' 


El 


01BE' 


21 0292' 


01C1' 


06 07 


01C3* 


CD 028A' 



L0AD1: 



L0AD4: 



L0AD3: 



L0AD2: 



LD 

CALL 

CP 

JR 

LD 

CALL 

OR 

JP 

CALL 

LD 

LD 

LD 

CALL 

LD 

INC 

DJNZ 

LD 

SUB 

JR 

LD 

LD 

INC 

DJNZ 

LD 

CALL 

CALL 

POP 

BIT 

JR 

PUSH 

LD 

LD 

LD 

CP 

JR 

INC 

LD 

INC 

LD 

LD 

LD 

CP 

JR 

INC 

INC 

DJNZ 



FOUND: 



LD 
LD 
CALL 



<DCB+30),A 

RDSYN 

(IX+26) 

NZ,LOADO 

D,E 

INBYTE 

A 

NZ,LOADO 

INBYTE 

B,A 

C,A 

HL,NAMERM 

INBYTE 

(HL),A 

HL 

L0AD1 

A, 10H 

C 

Z,L0AD3 

B,A 

(HL),20H 

HL 

L0AD4 

DE,0F08H 

CASDIR 

INBYTE 

HL 

2, (IX+20) 

Z, FOUND 

HL 

DE F NAMERM 

B,(HL) 

A,C 

B 

CSKIP 

HL 

A, (HL) 

HL 

H,(HL) 

L,A 

A, (DE) 

(HL) 

NZ,SKIP 

DE 

HL 

L0AD2 

HL 

HL,TFOUND 

BfLFOUND 

WRMES 



MERT IDOALAP HENTESE 
SZINKRON KERESE 
beolvasott TIPUS VIZSS 
=NEM FILENEV, ILLEBALIS 
CHECKSUM=BLOKK SORSZ.=0 
BLOKK SORSZAM BEOLV. 
BLOKK SORSZAM=0 ? 
=NEM FILE-NEV BLOKK 
FILE-NEV HOSSZ BEOLV. 
(B)=KARAKTEREK SZAMA 
KAR. SZAMANAK MENTESE 
(HL)=FILE-NEV PUFF.CIME 
FILE-NEV BEOLVASASA 
AKTUALIS KAR. MENTESE 
PUFFERCIM+1 
=MEG VAN A NEVBOL 
FILE-NEV HOSSZA MAX. 16 
NEV HOSSZANAK VIZSG. 
=A NEV 16 KAR. HOSSZU 
(B)=HOSSZ KULONBSEBE 
A PUFFER HATRALEVO 
RESZET FELT. SPACEVAL 
=VAN MEG TAR 
KURZOR POZICIONALASA 
15. SOR , 9. KARAKTER 
CHECKSUM BEOLVASASA 
(HL)=FILE-NEV LEIRO CIM 
VOLT FILE-NEV MEGADVA ? 
=NEM VOLT MEGADVA 
PUFFER KEZDOCIM MENT. 
(DE)=FILE-NEV PUFF. CIM 
(B)=FILE-NEV HOSSZA 
(A)=MAGN. BEOLV. HOSSZ 
FILE-NEV HOSSZ VIZSG. 
=MAGNOROL ROVIDEBB 

FILE-NEV CIM ALSO BYTE 

FILE-NEV CIM FELSO BYTE 

FILE-NEVEK HASONLITASA 

=NEM EGYFORMA NEVEK 



;=VAN MEG A NEVEKBOL 

;MEGVAN A FILE ! 
; (B)=SZOVEG HOSSZA 
;SZOVEG A DISPLAYRE 



F-92 



FOGGELfeK 



01C6' 


21 


0000» 


01C9' 


06 


10 


OICB' 


CD 


028A' 


OICE' 


C9 




OICF' 


21 


0299' 


01D2' 


06 


06 


01D4' 


CD 


028A' 


01D7' 


21 


0000« 


OlDA* 


06 


10 


OlDC 


CD 


028A' 


OlDF' 


C3 


OOFF' 



01E2 
01E3 
01E6 
01E7 
01E8 
01EB 
01ED 
01EF 
01F0 
01F3 
01F4 
01 F6 
01 F9 
01FA 
01FD 
01FE 
0201 
0203 
0206 
0207 
020A 
020B 

020D 
020E 
020F 
0210 

0211 
0213 
0215 



D5 

CD 026B' 

Dl 

BA 

3A 001B* 

28 06 

C6 01 

27 

32 001B« 

57 

3E OE 

CD 029F' 

7B 

CD 020D' 

7B 

CD 021 l f 

3E 20 

CD 029F' 

7A 

CD 020D' 

7A 

18 04 

OF 
OF 
OF 
OF 

E6 OF 
F6 30 
C3 029F' 



SKIP: 



LD 

LD 

CALL 

RET 

LD 

LD 

CALL 

LD 

LD 

CALL 

JP 



HL,NAMERM 

B,16 

WRMES 

HL,TSKIP 

B,LSKIP 

WRMES 

HL f NAMERM 

B,16 

WRMES 

LOADO 



(HL)=NEVPUFFER CIME 
(B)=FILENEV HOSSZ 
SZOVEG A DISPLAYRE 

NEM A KERESETT FILE 
(B)=SZOVEG HOSSZA 
SZOVEG A DISPLAYRE 
(HL)=NEVPUFFER CIME 
(B)=FILENEV HOSSZ 
SZOVEG A DISPLAYRE 
KOV. FILE KERESESE 



CHKSUM - CHECKSUM ELLENORZES 



REGISZTEREK: 



BE: 
KI: 
STK: 



CHKSUM: 
HELP1: 



CHKO: 



NUMBHI: 



<DCB+27)=EDDIGI HIBAS BLOKK SZAM 
(HL>, <DE),<BC),(AF)=? 
24 BYTE 



REGISZTER MENTESE 
CHECKSUM BEOLVASASA 
(D)=KEPZETT CHECKSUM 
KEPZETT=OLVASOTT? 
(A)=HIBA SZAMLALO 
=NINCS HIBA 
HIBA i,HIBA SZAMLALO+1 
HIBA SZAMLALO BCD ! 
HIBA SZAMLALO MENTESE 
REKSZAM, CHKSUM KIIRASA 
KURZOR A SOR ELEJERE 

BLOKK SORSZAM KIIRASA 
FELSO SZAMJEGY 

ALSO SZAMJEGY 

SPACE KIIRASA 

HIBA SZAMLALO KIIRASA 

FELSO SZAMJEGY 

ALSO SZAMJEGY + RETURN 

FELSO SZAMJEGY KIIRASA 
FELSO SZAMJEGY LETO- 
LASA AZ ALSO HELYERE 



NUMBLO: 



PUSH 


DE 


CALL 


INBYTE 


POP 


DE 


CP 


D 


LD 


A, (DCB+27) 


JR 


Z,CHKO 


ADD 


A,l 


DAA 




LD 


(DCB+27), A 


LD 


D,A 


LD 


A,OEH 


CALL 


CASDSP 


LD 


A f E 


CALL 


NUMBHI 


LD 


A,E 


CALL 


NUMBLO 


LD 


A,' ' 


CALL 


CASDSP 


LD 


A,D 


CALL 


NUMBHI 


LD 


A,D 


JR 


NUMBLO 


RRCA 




RRCA 




RRCA 




RRCA 




AND 


OFH 


OR 


'0' 


JP 


CASDSP 



;ALSO SZAMJEGY KIIRASA 
;(A)=ASCII KARAKTER KOD 
jKARAKTER KIIRASA + RET 
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FQGGELfeK 



PRGREC - PROGRAM BLOKK BEOLVASASA 



REGISZTEREK: 



BE: 

KI: 

STK: 

0218' CD 026B' PRGREC: 
021 B' 6F 
021C CD 026B' 

67 

09 

CD 026B» 

47 

CD 026B' PRG1: 

DD CB 14 66 

20 01 

77 

022F' 23 PRG2: 

0230' 10 F3 
0232' C3 01E2' 



( DCB+20 ) =ALLAPOTBYTE 
(BC)=€LTOLASI CIM 
<BC>=» 

(HL),(DE),<AF>=? 
24 BYTE 



021F' 
0220' 
0221' 
0224' 
0225' 
0228' 
022C 
022E' 



CALL 


INBYTE 


LD 


L,A 


CALL 


INBYTE 


LD 


H,A 


ADD 


HL,BC 


CALL 


INBYTE 


LD 


B,A 


CALL 


INBYTE 


BIT 


4, (IX+20) 


JR 


NZ,PRG2 


LD 


(HL) r A 


INC 


HL 


DJNZ 


PRG1 


JP 


CHKSUM 



PROGRAM BLOKK BEOLVASAS 
TOLTESI CIM ALSO BYTE 
TOLTESI CIM FELSO BYTE 
(HL)=TOLTESI CIM 
TOLTESI CIM + OFFSZET 
BLOKK HOSSZ BEOLVASASA 
(B)=BYTEOK SZAMA 
ADAT BYTE BEOLVASASA 
LOAD/TEST FUNKCIO ? 
=TEST FUNKCIO 
ADAT BYTE A MEMORIABA 
TOLTESI CIM NOVELESE 
=VAN MEG BYTE ! 
CHECKSUM ELLENORZ.+RET 



RDSYN - SZINKRON BYTE KERESES 

REGISZTEREK: 

BE: NINCS 

KI: (HL),(DE),(BC)=* 

(A)=KOVETKEZO BLOKK TIPUSA 
STK: 12 BYTE 



0235' 


AF 


RDSYN: 


XOR 


A 


0236' 


CD 0245' 


RDS1: 


CALL 


INBIT 


0239' 


FE D3 




CP 


0D3H 


023B' 


20 F9 




JR 


NZ,RDS1 


023D' 


CD 026B' 


RDS2: 


CALL 


INBYTE 


0240' 


FE D3 




CP 


0D3H 


0242' 


28 F9 




JR 


Z,RDS2 


0244' 


C9 




RET 





(AX-0 , (CYX-0 
KOVETKEZO BIT BEOLVASAS 
SZINKRON KARAKTER ? 
=MEG NEM SZINKRON ! 
KOV. BYTE BEOLVASASA 
TOVABBI SZINKRON KAR. 
KISZURESE,TIPUS BEOLV. 



INBIT - EGY BIT BEOLVASASA 



REGISZTEREK: 



BE: 
KI: 
STK: 



(DCB+29)=FAZISF0RDITAS FLAG 
(DCB+30)=SZAMIT0TT BIT IDO 
<HL),(DE), <BC),(A)=* 
(CY)=BEOLVASOTT BIT 
6 BYTE 
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FOGGELiK 



0245' 


C5 




INBIT 


0246' 


D5 






0247' 


F5 






0248 


' ED 


SB 00 ID* 




024C 


01 


0004 


INB2: 


024F 


' DB 


IF 


INB3: 


0251" 


AB 






0252 


' Al 






0253 


' 28 


FA 




0255 


' DB 


IF 


INB4: 


0257 


' 04 






0258 


' AB 






0259 


' Al 






025A 


' 20 


F9 




025C 


' 78 






025D 


' FE 


06 




025F 


' 38 


EB 




0261 


' BA 






0262 


' CB 


10 




0264 


' Fl 






0265 


' CB 


18 




0267 


' 17 






0268 


' Dl 






0269 


' CI 






026A 


' C9 







PUSH 


BC 


PUSH 


DE 


PUSH 


AF 


LD 


DE, (DCB+29) 


LD 


BC,4 


IN 


A, (1FH) 


XOR 


E 


AND 


C 


JR 


Z,INB3 


IN 


A, (1FH) 


INC 


B 


XOR 


E 


AND 


C 


JR 


NZ,INB4 


LD 


A,B 


CP 


6 


JR 


C, INB2 


CP 


D 


RL 


B 


POP 


AF 


RR 


B 


RLA 




POP 


DE 


POP 


BC 


RET 





;REGISZTEREK MENTESE 



(D)=IDO, <E)=FAZISFORD. 
(B)=IDOSZLO, <C)=MASZK 
MAGAS SZINT KIVARASA 
FAZISFORD. KORREKCIO 
MAGNETOFON VONAL VIZSG. 
=MEG ALACSONY SZINT 
MAGAS SZINT MERESE 
I DO SZAMLALO NOVELESE 
FAZISFORD. KORREKCIO 
MAGNETOFON VONAL VIZSG. 
=MEG MAGAS SZINT 
(A)=MERT BIT I DO 
ZAJ KISZURESE 
=ZAJ VOLT i 
BIT IDO VIZSGALAT 
(CY)=BEOLVASOTT BIT 
(A) VISSZAMENTESE 

;BEOLV.BIT AZ ACO-BAN 
;REGISZTEREK VISSZAMENT. 



INBYTE - EGY BYTE BEOLVASASA 



REGISZTEREK: 



BE: 
KI: 



STK: 



(D)=CHECKSUM 
(A)=BEOLVASOTT BYTE 
(D)=UJ CHECKSUM 
(HL),(E),(BC)=« 
10 BYTE 



026B' C5 


INBYTE: 


026C* 06 08 




026E' CD 0245' 


INB1: 


0271' 10 FB 




0273' 47 




0274' 82 




0275' 57 




0276' 78 




0277' CI 




0278' C9 


; SPAUS 



PUSH BC 
LD B,8 
CALL INBIT 
DJNZ INB1 
B,A 
A,D 
D,A 
A,B 
BC 



LD 

ADD 

LD 

LD 

POP 

RET 



RE6ISZTER MENTESE 
1 BYTE = 8 BIT 
KOVETKEZO BIT BEOLV. 
=VAN MEG BIT ! 
BEOLVASOTT BYTE MENTESE 
UJ CHECKSUM KEPZESE 
(D)=CHECKSUM 
(A>=BEOLVASOTT BYTE 
REGISZTER VISSZAMENT. 



SZUNET KERESES A SZALAGON 



0279' C5 



SPAUSE: 



PUSH BC 



; REGISZTER MENTESE 
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027A' 


01 00E0 


SPAO: 


027D' 


DB IF 


SPA1: 


027F' 


E6 04 




0281' 


28 F7 




0283' 


OB 




0284' 


78 




0285' 


Bl 




0286' 


20 F5 




0288' 


CI 




0289' 


C9 





LD 


BCOEOH 


IN 


A, (1FH) 


AND 


4 


JR 


Z,SPAO 


DEC 


BC 


LD 


A,B 


OR 


C 


JR 


NZ f SPAl 


POP 


BC 


RET 





(BC)=IDOKONSTANS 
MAGAS SZINT KIVARASA 
MAGNETOFON VONAL VIZSG. 
=MEG ALACSONY SZINT 
I DO SZAMLALO CSOKKENT. 
ELOKESZITES VIZSGALATRA 
(B) * (C> = ? ■ 
=VAN MEG I DO ! 
REGISZTER VISSZAMENT. 



WRMES - SZOVEG A DSP UTOLSO SORABA 



028A' 
028B' 
028E' 
028F' 
0291' 



7E 

CD 029F' 
23 

10 F9 
C9 



WRMES: 



0292' 46 4F 55 4E TFOUND: 

0296' 44 3A 20 

0007 LFOUND 



LD A, (HL) 
CALL CASDSP 
INC HL 
DJNZ WRMES 
RET 

DEFM 'FOUND: 



;(A)=AKT. KARAKTER 
;KARAKTER KIIRATASA 
;KOVETKEZO KAR. CIME 
;=VAN MEG KARAKTER 



0299' 53 4B 49 50 TSKIP: 

029D' 3A 20 

0006 LSKIP 



EQU 7 

DEFM 'SKIP: ' 
EQU 6 
CASDSP - FELTETELES KIIRAS A DSP-RE 



029F' DD CB 14 4E CASDSP: 
02A3' CA 0000» 
02A6' C9 



BIT l,(IX+20) ;FELTETEL VIZSGALAT 

JP Z,DISP |=KIIRATAS ENGEDELYEZVE 

RET 



CASDIR - FELTETELES KURZOR CIMZES 



02A7' DD CB 14 4E CASDIR: 
02AB' CA 0000* 
02AE' C9 



BIT 1,(1 X+20 ) ; FELTETEL VI ZSGALAT 

JP Z,DIRCUR ;=KIIRATAS ENGEDELYEZVE 

RET 
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INDEX 



• 1-3,1-5,1-37 

- 1-3 

t 1-3,1-4,1-5,1-37 

S 1-3,1-5,1-36 

IS 1-39 

X 1-3,1-5,1-40 

X...X 1-37 

« I-3,F-36 

t 1-3,1-42 

( 1-3,1-6,1-8,1-13 

) 1-3,1-6,1-8,1-13 

• 1-3,1-8,1-13,11-1 

» (AUTO parancs eseten) 1-19 

*• 1-39 

»«S 1-39 

+ 1-3,1-8,1-11,1-13,1-38,11-1 

f 1-3,1-35,1-39 

- 1-3,1-8,1-13,1-38,11-1 

1-2,1-3,1-4,1-14,1-38 

1-19 

/ 1-3,1-8,1-13,11-1 

• 1-2,1-3,1-14 

■ 1-3,1-30,1-35 

< 1-3,1-9,1-12,1-19 

- 1-3,1-9,1-12,1-31,11-1 

> 1-3,1-9,1-12,1-19 

-> 1-3,1-30,1-36 

v> 1-30 

[ 1-19 

] 1-19 

t 1-3,1-8,1-13,11-1 

tttt 1-39 

«- I-14,II-54,F-10 

SHIFT/*- I-15,II-54,F-13 

-i . 1-14 

SHIFT/-* I-15,II-54,F-10,F-13 

\ 1-14, 1-16, 11-51, F-10 

| 1-19 



- beolvasas - PRGREC ... II-65,F-55 

F-94 

- feliras - WRREC . II-63,F-55,F-86 

Aktualis sor 1-2,1-14 

Alahuzas bekapcsotas - CTR/E .. F-10 

- kikapcsolas - CTR/U F-12 

Also index bekapcsolas - CTR/P F-ll 

- kikapcsolas - CTR/Q F-12 

AND muvelet 1-10,1-13,11-22 

Aritmetikai munkaregiszterek . 11-36 

- muveletek 1-8 

- operator csomag 1 1-23 

- rutinok 11-39 

- egesz muveletek 11-40 

- egyszerespontos muveletek 11-41 

- duplapontos muveletek ... 11-43 

ASC(xS) fuggveny 1-47, F-2 

ASCII kodok F-7 

ATN(x) fuggveny 1-47,11-44 

ATN - sor os busz f igyelemfelhivas 

F-41,F-44 

AUTO parancs I-19,F-2 

Automatikus inditasu gepi k6dii prog- 
ramallomany zar6 blokk 11-58 

- sorszamozas 1-19 

- tipuskonverzi6 ... 1-7,1-47,11-21 



Alloraany kezeles 1-24,1-31 

1-34, 1-41, 1-44, 1-45, 11-55 

- leiras (FD) hiba 1-24,1-31 

I-41,F-5,F-6 

- nev 1-24,1-32,1-34,1-44 

1-46,11-57 

- szinkron mez6 11-56,11-61 



ABS(x) fuggveny 1-47,11-46 

Adatallomany kezeles 1-24,1-31 

1-34, 1-41, 1-44, 1-45, I 1-55 

- nev ... 1-24,1-34,1-44,1-46,11-55 

- zar6-blokk 11-58 

Adat-blokk 11-55,11-57 



BASIC interpreter 11-1,11-4 

- program tarolas 1-44,11-1 

1 1-3 

- valtozok 1-5,11-6 

- vegrehajtas 1-21,11-4 

BEEP ut as it as I-22,F-23 

- elemi hanggenerator F-79 



BE-1 Bemenet i kapu F-42 

BE-2 Bemeneti kapu F-43 

Bemenet i/Kimeneti kapuk F-39 

Betel t a karakterterulet (OS) hiba 

I-23,F-4,F-6 
Betelt a memoria (OH) hiba 1-14 

1-26, F-3, F-6 

Betoltesi cira 11-58 

Betak 1-2 

BIE csatlakozo F-42, F-44 

Billenty&k 1-14,1-16 

- periferia cimei F-15 

Billentydzet bemenet F-43 

- kezelo rutinok - KYBHND, KKBHND 

11-51, II-54,F-54,F-68,F-71 

- ku I on leges mdd ROM-kapocs . 11-51 

F-30 

- puffer II-4,II-5,F-28 

BinAris - karakteres konverzio 11-38 
Bit magn6ra ir Asa 1 1-59 

- ol vasAsa 1 1-60 

Blokk H-55 

- adat-blokk 11-57 

- nev-blokk 11-57 

- zArd-blokk 11-58 

- sorszAm 1 1-56 

- szabvAnyos f elepitese 1 1-56 

- szinkronizAlAs - RDSYN 11-65 

F-94 

- szinkron mez6 11-56,11-62 

- tipus 11-56,11-57 

Bonyolult karakteres kifejezes (ST) 

hiba I-47,F-4,F-6 

BotkormAny F-39, F-43, F-44 

Break in nnnn uzenet 1-17,1-26 

1-45 
BRK billentyft 1-15,1-16,1-20 

1-21,1-30,11-4,11-54 
BS-Bad Subscript hiba I-26,F-3 

F-6 
Byte beolvasAs - INBYTE 11-65 

F-55,F-95 



CALL( 2 E,j]> fuggveny 1-47 

CDBL(x) fuggveny 1-48,11-43 

CHRS(l) vezerld kod F-9 



INDEX 

CHRK9) vezerld k6d F-10 

CHRS(i) fuggveny I-48,F-2 

Cimfuggveny 11-11 

CINT(x) fuggveny 1-49,11-41 

CLEAR utasitas 1-23,1-33,11-14 

F-2,F-4 

CLOSE utasitas I-24,F-5 

CLRDOT - grafikus pont kikapcsolisa 

II-67,F-55,F-83 

CLS billentyu I-16,II-54,F-11 

CLS utasitas 1-24 

CN-Can't Continue hiba I-20,F-4 

F-6 
Commodore soros busz vezerles . F-41 

F-43 
CONT parancs 1-20,1-31,1-45 

II-6,F-4,F-5 

COS(x) fuggveny 1-49,11-44 

CREATE utasitas 1-24,1-41 

F-2,F-5 

CSNG(x) fuggveny 1-50 

Csatlakozdk F-39 

- BIE F-42,F-44 

- botkormany F-39, F-43, F-44 

- soros busz F-41, F-43, F-44 

- TAPE F-39, F-40,F-42 

CTR billentyll 1-16 

- /B nyujtott karakter megjelenites 
bekapcsolas F-9 

- /C feher kepernyd alapszin .. F-9 

- /D inverz karakteralap bekapcso- 
lAs F-9 

- /E karakter alahuzas bekapcsolas 

F-10 

- /F eldtorl*s bekapcsolAs ... 1-24 

F-10 

- /G hangjelzes F-10 

- /N kurzor a sor elejere . — F-ll 

- /0 fuggoleges irAs F-ll 

- /P als6 index F-ll 

- /Q felso index F-12 

- /R normAl meretft karakter megje 
lenites F-12 

- /S fekete kepernyd alapszin beAl- 
litAs .-■-■ F-12 

- /T normAl karakteralap beAllitAs 

F-12 

- /U karakter alAhuzAs kikapcsolAs 

F-12 

- /V eldtorles kikapcsolAs ... F-12 



INDEX 



- /H vizszintes iris F-13 



Dal L amok megsz6laltatisa F-23 

DATA-lista 1-42,1-43 

DATA utasitas 1-24,1-42,1-43 

DD-Double Dimensioned hiba .... 1-26 

F-3,F-6 

Decimal is pont 1-3,1-4,1-38 

DEFDBL utasitas 1-25 

DEFINT utasitas 1-25 

DEFSN6 utasitas 1-25 

DEFSTR utasitas 1-25 

DELETE utasitas I-20,F-2 

DIM utasitas 1-26,11-10 

DIRCUR - direkt kurzor cimzd rutin 

II-65,F-55,F-B1 
Direkt (parancs) m6d 1-1,1-19 

1-22,1-31,11-4 
Direkt modban nem alkalmazhato (ID) 

hiba I-31,F-4,F-6 

/O-Di vision by Zero hiba I-9,F-4,F-6 
Duplapontos val6s konstans 1-4 

- mftveletek 11-42 

- sziraibrizolis 11-33 

- tibia elem II-9 

DSPHND - Kepernyd kezeld rutin 

I 1-49, I 1-54, F-54, F-59 



Egy sort beolvasd rutin - 6LINE 

II-53,F-54,F-77 
Egy byte beolvasd rutin - INBYTE 

1 1-65, F-55, F-95 

Egyvonal as oktav F-25 

Eligazd utasitas 1-10 

Elemi hanggeneritor - BEEP .... F-79 

Ellendrzd osszeg 11-57 

ELSE kulcsszd 1-29 

Eldtdrles bekapcsolis (CTR/F) . F-10 

- kikapcsolis (CTR/V) F-12 

END utasitas 1-20, 1-26, I 1-6 

ENDREC - Zird-blokk feliris .. 11-64 

F-55,F-88 

Error in nnrwi uzenet 1-17 

ERL fuggveny 1-49 

ERR fuggveny 1-49, F-l 

ERROR utasitas 1-26, F-l, F-2,F-5 

EXP(x) fuggveny 1-50,11-45 

Exponens ibrizolas 11-33 

Exponenciilis alak 1-39,11-32 

- kijelzes 1-39 

?Extra ignored uzenet 1-30 



fekezetes betftk 1-2, F-7 

fertek-resz <karakteres) 11-13 



EDIT parancs 1-14, 1-20, F-3, F-10, F-13 
Edi talis (programszerkesztes) . 1-13 
Editor 1-13,1-20 

- ujrainditasa 1-14, F-10 

Egesz szim 1-4 

Egesz tipusa - karakteres konverzii 

11-38 

- mftveletek 11-39 

- szamabrazolis 11-29 

- tibia elem 1 1-8 

Egyszerespontos konstans .. 1-4,11-6 

- maveletek 11-41 

- szimibrizol is 1 1-32 

- tibia elem II-9 



FC-Illegal Function Call hiba . 1-20 

1-24, 1-32, 1-34,1-36,1-44,1-45 

1-53, 1-55, F-2, F-3, F-6 
FD-File Description hiba 1-24 

1-31, 1-41, F-5, F-6 
Feher kepernyd alapszin beil Litis 

(CTR/C) F-9 

Fekete kepernyd alapszin beil litis 

(CTR/S) F-12 

Felhasznil6i CUE) hiba 1-27, F-5 

F-6 
Felhaszniloi karakterek definiilisa 

F-17 

Felsd index (CTR/Q) F-12 

File kezeles 1-24,1-31,1-34 



INDEX 



1-41,1-44,1-45,11-55 

FIX(x) fuggveny 1-50,11-46 

Fi xpontos sz Am 1-4 

FOR-adatcsomag felepitese .... 11-16 

11-17 
Formai (SN) hiba 1-15,1-25,1-28 

1-50, 1-52, F-l,F-6 

FormAtum vezerles (USING) 1-36 

Form-feed H-52 

FOR... NEXT ciklus 1-23,1-27 

FOR nelkuli NEXT (NF) hiba 1-28 

F-l,F-6 

FOR utasitAs 1-27 

FOUND: uzenet 1-32 

FRE(O), FREC") fuggveny 1-50 

Fuggvenyek 1-11,1-13,1-46,11-43 



II-20,F-5,F-6 
Hossza karaktersorozat (LS) 
1-12, 1-47, F-4,F-6 



hiba 



Gepi kodu rutinok tArolAsa ... 11-24 

Gepi nulla 11-34 

GLINE - egy sort beolvasd rutin 

II-53,F-54,F-77 
GOSUB-adatcsomag felepitese .. 11-18 
GOSUB nelkuli RETURN (RG) hiba 

I-28,F-l,F-6 
GOSUB utasitas 1-23, 1-28, 1-33 

1-42, F-3 
Grafikus pont kezeld rutiribk . 11-66 

- bekapcsolAs II-67,F-55,F-83 

- kikapcsolAs II-67,F-55,F-83 

- vizsgAlat II-67,F-55,F-84 
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HanggenerAtor - BEEP F-79 

- jel forma 1-23, F-23 

. - parameterezes 1-23, F-23 

Hangjelzes (CTR/G) F-10 

HatvAnyozAs-csomag ........... I 1-23 

Hibajelzesek 1-17, F-l 

Hibakezeles (programozott) .... 1-33 
Hiba nelkuli RESUME (RU) hiba . 1-44 

F-5, F-6 
HibAs index (BS) hiba . I-26,F-3,F-6 
HiAnyzo operandus (NO) hiba .... 1-9 



I regiszter 1-48 

IF... GOTO... ELSE utasitas 1-29 

IF... THEN. ..ELSE utasitAs . 1-29, F-3 
ID-Illegal Direct hiba 1-31, F-4 

F-6 

I I legal is funkciohivAs (FC) hiba 

1-20, 1-24,1-32,1-34, 1-36,1-38 

1-43,1-44, 1-45,1-48,1-54, 1-56 

IndiVekt (program) m6d .... 1-1,1-19 

Index szAmitAs II-H 

Indexelt vAltozi 1-6 

- tAbla elem H-10 

INBYTE - Egy byte beolvasAs .. I 1-65 

F-55,F-95 

InditAsi cim H-58 

INKEYS fuggveny 1-50 

INIT - Power-On RESET rutin ... F-56 

1-0 kapuk - F-39 

INP(i) fuggveny I-51,F-2,F-15 

INPUT utasitAs 1-30, F-4 

INPUT* utasitAs .. 1-31, 1-34, F-4, F-5 

Input portok F-42 

INT(x) fuggveny 1-51,11-46 

Interpreter 1 1— 1 

- belso kodjai II-l,F-45 

- mukodese 11-1,11-4 

- ROM-kapcsok F-36, F-37 

- vAltoz6k F-33 

Inverz alap beAllitAs (CTR/D) .. F-9 

- kikapcsolAs (CTR/T) F-12 

IX regiszter 1-48, F-30 



Jelolesek 1-19,1-46 
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Kalkulitor mod 1-1 

Karakter 1-2 

- alahazas bekapcsolas (CTR/E) F-10 

- alahazas kikapcsolas (CTR/U) F-12 

- definialas F-17 

- egymasra iris F-13 

- generator terulet 11-50 

- keszlet I-2,F-7 

- k6dok F-7 

- konstansok ... 1-3,1-24,1-25,1-40 

- maveletek 1-11,1-12 

- tipusu tabla elem 11-10 

- torlese 1-14, F-10 

- valtozo terulet 1-23,11-14 

- valtozok kezelese 11-12 

Karakteres ertek 1-46 

Karakterisztika abrazolasa ... 11-33 
Kettes komplemens kddu szababrazolas 

11-29,11-30 
Kepernyd kezelo rutin - DSPHND 11-49 
II-54,F-54,F-59 

- kioltas jetz6 bit F-42 

- lapkijeloles F-40 

- merete 1-43 

- RAM kezdocime F-30 

- allomany zaro-blokk 11-58 

- tartalom mentese (SAVE SCREEN) 

1-44 

- torlese (CLS) I-24,F-11 

Ketvonalas oktav F-25 

Kifejezes 1-8,1-25 

- csomagok 11-21,11-23,11-24 

- feldolgozas 11-19 

Ki menet i kapuk F-39 

- KI-1 (0...63 cimek) F-39 

- KI-2 (64... 127 cimek) F-41 

Kimerult a DATA-lista (0D) hiba 

I-42,F-2,F-6 

Kis oktAv F-24 

Kitevo (exponens) ibrizolisa . 11-33 
Kivarasos billentyazet vizsgal6 ru- 
tin - KKBHND 11-51, F-54,F-71 

Kivond rutinok ... 11-40,11-41,11-43 
KKBHND - kivarasos billentyazet ke- 
zelo rutin II-51,F-54,F-71 

Konkatenaci6 (osszefazes) 1-1 1 

Konstansok 1-3 



Kontra oktav F-24 

Konverzi6 1-7 

- automatikus 1-7 

- binaris - karakteres 11-37,11-38 

- fuggvenyek 1-48. 1-49 

- karakteres - binaris 11-37,11-38 

- karakteres - duplapontos .. 11-38 

- rutinok . 11-37,11-41,11-42,11-43 

- tablazatok F-49 

Kulcssz6 1-5, 1-19, 1-22, F-45 

- belso kddok F-45 

KURPOZ - kurzor pozicio megillapitd 

rutin II-66,F-55,F-80 

Kurzor a sor elejere (CTR/N) .. F-ll 

- cimzd rutin - DIRCUR 11-65 

F-55,F-81 
Kurzor poziciot megALlapitd rutin - 

KURPOZ II-66,F-55,F-80 

Kulonleges billentyak .... 1-14,1-16 

- karakterek 1-2 

KYBHND - billentyazet vizsgalo rutin 

II-54,F-54,F-68 



Lebegdpontos szira 1-4 

LEFTi(xf,i) fuggveny 1-51, F-2 

Leir6 resz (karakteres) 11-12 

LEN(xf) fuggveny 1-51 

LET utasitas 1-31 

Lezaratlan hibakezeles (NR) hiba 

I-33,F-5,F-6 

LIST parancs 1-20 

LLIST parancs 1-21 

ln(x) fuggveny (LOS) 1-51, I 1-45, F-3 

LOAD utasitas 1-32, 1-45, F-2 

L06(x) fuggveny 1-51, 1 1-45, F-3 

Logikai alloraanykezeles .. 1-24,1-31 

1-34,1-41,1-44,1-45 

- £S mavelet 1-10 

- maveletek 1-9 

- NEM mavelet 1-10 

- oper Ator csomag 1 1-23 

- VASY mavelet 1-10 

LPRINT utasitas 1-32,1-54 

LPRINT USINB utasitis 1-32 

LS-Long String hiba 1-12,1-47 

F-4,F-6 
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Ludolf-fele szAn (PI) 1-52 
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Magno adatbemenet F-42 

- adatkimenet F-40 . 

- logikai kezeles 11-55 

- fizikai kezeles 11-59 

- bit f el iris 1 1-59 

- bit beolvasAs 11-60 

- tAvvezer I es F-39, F-40 

MA6N0 - magno kezeld rutinok . 11-63 

F-B6 

Mantissza AbrAzolAsa 11-33 

Maximal is laphossz 11-52 

- sorhossz • 1 1-52 

Megjegyzes (REM) utasitAs 1-42 

Megjelenitheto karakterek .. F-7,F-8 
MegszakitAs ... 1-16,1-23,1-45,11-48 

Memoria felosztAs F-27 

MIDI (xS, it,,/]) fuggveny ... 1-51, F-2 
MO-Missing Operand hiba .. 1-9,11-20 

F-5,F-6 

MunkavAltoz6k II-36,F-29,F-33 

Mlkodesi ro6dok 1-1 

Mftveleti jelek I-8,I-9,F-45 

- vegrehajtAsi sorrendje 1-12 
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Nagy okt Av F-24 

NemdefiniAlt sor (UL> hiba .... 1-14 

1-21, 1-28,1-29,1-33, 1-43,1-44 

F-3,F-6 
Nem folytathatd (CN) hiba 1-20 

F-4,F-6 
NEU parancs 1-16,1-21,1-22 

1-32, 1-33 

NEXT utasitAs 1-23,1-27 

NF-NEXT without FOR hiba 1-28 

II-16,F-l,F-6 
Nev-blokk 11-55,11-57 

- felirAs - URHEAD H-63 

F-55,F-87 

- kereses/olvasAs - RDHEAD .. 11-64 

F-55,F-90 



NMI engedelyezes F-25, F-39, F-40 

NHI-TIMER rutin II-48,F-55 

NormAl alak 1-4,11-32 

NormAl merettt karakter megjelenites 

(CTR/R) F-12 

NOT mavelet 1-10,1-13,11-22 

NR-No RESUME hiba I-33,F-5,F-6 

NullAval osztAs (/0) hiba 1-9 

F-4,F-6 
Numerikus konstans ... 1-3,1-24,1-25 
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Nyomtato kezeld rutin - PRTHND 

II-52,F-54,F-75 
Nydjtott meretft karakter megjeleni- 
tes (CTR/B) F-9,F-12 



OD-Out of DATA hiba ... 1-42, F-2, F-6 

Ok felirat 1-1,1-13,1-26 

OktAvok F-24, F-25 

OM-Out of Memory hiba .... 1-14,1-26 

F-3,F-6 
ON ERROR SOTO utasitAs . . . 1-33, 1-44 

I-49,F-3 
ON x 60SUB utasitAs ... I-33,F-2,F-3 

ON x BOTO utasitAs 1-33, F-2, F-3 

OPEN utasitAs I-34,F-2,F-6 

OR wavelet 1-10,1-13,11-22 

OS-Out of String Space hiba ... 1-23 

F-4,F-6 

Oszto rutinok 11-40,11-42,11-43 

OUT utasitAs I-34,F-2 

Output kapuk F-39 

OV-Overflow hiba . 1-7,1-9,1-10,1-22 

1-34, 1-46, 1-49, 1-50, F-3, F-6 



0sszead6 rutinok . 11-40,11-41,11-43 

Osszefazes (konkatenAcio) 1-11 

0sszehasonlit6 maveletek .. 1-9. 1-12 
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- rutinok 11-40,11-42,11-43 



Parancsok 1-19 

- vegr eha jt Asa 1 1-5 

Parancs m6d 1-1,1-19,1-22,1-31 

PEEK(x) fuggveny 1-52 

Periferia kezeld rutinok 11-47 

PI fuggveny 1-52 

P0INT(i,J> fuggveny 1-52, F-2 

POKE utasitAs 1-34, I-52,F-2 

PONT - elemi pont maveletek .. 11-67 

F-83 

POS(O) fuggveny 1-52 

Power-On RESET rutin - INIT ... F-56 
PR6REC - Adat-bLokk beolvasAs 11-65 

F-55, F-94 

PRINT utasitas I-35,F-10 

PRINT USING utasitas 1-36, F-2 

PRINT* utasitas .. 1-24, 1-41, F-2, F-5 

PRINT* USING utasitas 1-41 

PRINTS utasitas 1-36, F-2, F-ll 

PRINTS USING utasitas 1-36 

Program 1-1 

- AbrAzolAs 11-1,11-3 

- ertelmezes 11-2,11-4 

- iris 1-13 

- megszakitAs 1-16,1-23,1-45,11-48 

- mod 1-1 

- sor 1-2,1-42 

- sor hossza 1-14,1-15 

- sor vege 1-1,1 1-2 

- szerkesztes 1-13,1-14,1-20 

- tArolAs 1-44 

- tarolon beluli mozgatasa ... II-5 

Programozott hibakezeles 1-33 

PRTHND - nyomtat* kezeld rutin 

II-52,F-54,F-75 



RANDOM utasitAs 1-41 

RDHEAD - Nev-blokk kereses/olvasAs 

rutin II-64,F-55,F-90 

RDSYN - Blokk szinkronizal6 rutin 



I 1-65, F-94 

READ utasitAs 1-24,1 

Real-time 6ra II 

?RED0 uzenet 

RelAcio m&veletek .... 1-9,1 

- karakteres adattal csomag 

- numerikus adattal csomag 

REM utasitAs 

Rendszer vAl tozok 

RESET nyomdgomb .... I 1-6, I I 

RESET utasitAs 

RESET rutin II-48,F 

RESTORE utasitAs 1-23, 

RESUME utasitAs 1-33, 

RESUME utasitAs 

RESUME NEXT utasitAs 

RETURN billentyu 1-1,1 

I-19,II-4,F-11 

RETURN utasitAs I 

R6-RETURN without GOSUB hiba 

II-18,F-l,F-6 

RIGHTS <*S,i> fuggveny 

RND(jf) fuggveny 1-53,1 

ROM kapcsok F 

RST belepesi pontok 

RUN parancs 1^-21,1-33, 

RU-RESUHE without error hiba 

F-5,F-6 



-25, 1-42 
-4B,F-30 
1-30 
-12,1-13 
. 11-24 
.. 11-24 
... 1-42 
... F-29 
-48,F-42 
1-43, F-2 
-54, F-56 
1-43, F-3 
1-43, F-5 
... 1-43 
... 1-43 
-15,1-16 

-23, 1-28 
1-28 



... 1-52 
1-45, F-3 
-36,F-37 
... F-29 
I 1-6, F-3 
1-44 



SAVE utasitAs 1-44, F-2 

SAVE SCREEN utasitAs 1-32,1-44 

SCLK - sor os busz orajel . F-41,F-43 
SDATA - sor os busz adat .. F-41,F-43 

SET utasitAs , I-45,F-2 

SETDOT - grafikus pont bekapcsolo 

rutin 1 1-67, F-55, F-83 

S6N(x) fuggveny 1-53,11-46 

SHIFT billentyft 1-14,1-16 

SIN(x) fuggveny 1-53,11-44 

SkalAr tAbla bejegyzesek 1 1-7 

SKIP: uzenet 1-32 

SN-Syntax Error hiba 1-15,1-25 

1-28, 1-50, I-52,F-l,F-6 
Sor beolvasd rutin - GLINE ... 11-53 
F-54, F-76 
- feldolgozAs II-4 
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- hossz 1-14,1-15 

- szAm 1-2,1-14,1-15,11-2 

- szerkesztes 1-14 

- lezArAsa (SHIFT/-*) .. I-15,F-13 

- ujrakezdese (SHIFT/*-) 1-15, F-13 

- tor Use 1-13,1-14,1-20 

Soros busz figyelemfelhivAs (ATN) 

F-41.F-43 

- csatlakoz6 F-41,F-43,F-44 

- kiszolgAlAs keres (SRQ) F-41,F-43 

- vezerles F-41 

Special is billentyuk 1-14,1-16 

SQR(x) fuggveny 1-53, I 1-45, F-3 

SRQ - soros busz kiszolgAlAs keres 

F-41,F-43 
ST-String Formula Too Complex hiba 

1-47, F-4, F-6 
STACK 1-48,11-14 

- bejegyzesek ■ 1 1-15 

- FOR adatcsomag 11-16 

- GOSUB adatcsomag 11-18 

- kifejezes csomagok 11-21,11-23 

- torlese 1-23 

STEP kulcsszo 1-27 

STOP utasitas .. 1-20,1-26,1-45,11-6 

STRS(x) fuggveny 1-53 

String I- 3 

STRINGI(i,jlxS) fuggveny .. 1-54, F-2 
SYSTEM - PRIMO ROM START F-54 
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SzAmAbrAzolAs 1-3 

- egesz t ipusu 1 1-29 

- val6s t ipusu 1 1-32 

SzAmspecifikAcio 1-36 

SzAmjegykarakter 1-2 

- konstans 1-3,1-24,1-25 

Szerkesztes 1-13,1-14,1-20 

Szorzd rutinok ... 11-40,11-41,11-43 



TAB(i) fuggveny 1-54, F-3 

TAN(x) fuggveny 1-54,11-44 

TAPE csatlakozo F-39,F-40,F-42 



TArol6 felosztAs F-27,F-28 

- igeny 1-6,11-1 

Termeszetes alapu logaritmus (LOB) 

fuggveny 1-51, I 1-45, F-2 

TeruletfoglalAs gepi kodu rutinok 

szamAra 11-24,11-25,11-26 

TEST utasitis 1-45 

TIMER rutin II-48,F-55 

Tipus azonositd karakterek 1-5,11-6 

- deklarAci6 1-5,1-25 

- keveredes (TM) hiba 1-7,1-28 

1-31, 1-41, F-4,F-6 

- kod 11-7,11-8,11-9,11-10 

II-17,II-37,F-34 

- konverzio 1-7,1-48,1-49 

Tizedes pont • 1-3,1-4,1-38 

TM-Type Mismatch hiba ..... 1-7,1-28 

1-31, 1-41, F-4,F-6 

Token II-l,F-45 
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Tomb 1-6, 1-26, 11-10, F-3 

- ujradimenzionAlAs (DD) hiba 1-26 

F-3,F-6 

- vAltozdk 1-6, F-3 

Tories (karakter, sor) 1-14 

TR0FF parancs I~22 

TRON parancs I~22 

TSTDOT - grafikus pont vizsgAld ru- 
tin II-67,F-55,F-84 

TaicsordulAs (0V) hiba 1-7,1-9 

1-10, 1-22, 1-34, 1-46, F-3, F-6 
TulsAgosan bonyolult karakteres ki- 
fejezes (ST) hiba I-47,F-4,F-6 

Tukor byte F-40 
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UE-User Error hiba .... I-27,F-5,F-6 

Ugr6tAbla H-47 

Clj karakterek definiAlAsa F-17 

UL-Undefined Line hiba ... 1-14,1-21 
1-28, 1-29, 1-33, 1-43, 1-44, F-3, F-6 

Upper billentyu 1-16 

UtasitAsok 1-22 

- vegrehajt Asa 1 1 - 5 
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V24 interface F-39,F-40 

VAL(xf) fuggveny 1-54 

Val6s numerikus konstans 1-4 

- tipusu szamabrazolas 11-32 

VARPTR fuggveny 1-55 

Viltoz6k 1-5 

- nevek 1-5 

- tablazatai II-6 
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- egyszerespontos val6s .... II-7 

- duplapontos vat 6s II-7 

- karakteres 11-10 

- indexelt 11-10 

- tarol6 igenye 1-6 

Varakozis kepkioltasra - VBLANK ru- 
tin II-49,F-55 

Vezerld billentyak I-16 f F-9 

- karakterek F-9 

Vegrehajtasi sorrend 1-12 

Veletlenszam sorozat 1-41 

1-53,11-45 
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URHEAD - Nev-blokk felir6 

I 1-63, F-55, F-87 
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II-63,F-55,F-86 
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rutin 
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